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CHAPTER  I 


INTRODUCTION 

Software  reuse  is  currently  a  topic  of  great  interest 
in  the  theory  and  practice  of  computer  science  in  both 
academia  and  industrial  research.  Reducing  software 
development  cost  through  reuse  of  previously  written  and 
debugged  code  is  practiced  in  many  forms  today  and  it  "is  an 
effective  strategy  for  developers  to  reduce  implementation 
cost"  [PA90] ;  however,  it  is  usually  at  the  individual 
programmer  level  and  very  informal,  based  on  one  person's 
stock  and  his/her  concept  of  what  can  be  reused.  By 
combining  the  efforts  of  a  set  of  programmers  at  a  given 
site,  reuse  libraries  can  be  formed.  Each  programmer  can 
then  draw  on  source  code  from  this  library  to  accomplish  a 
given  task. 

The  next  step  is  to  make  the  use  of  the  library 
efficient  enough  that  the  programmers  would  be  willing  to 
use  it  regularly,  both  as  a  customer  and  a  contributor.  The 
software  components  in  the  library  must  be  readily 
accessible.  A  means  must  be  devised  to  retrieve  the  closest 
match  that  meets  a  programmer's  need  with  the  least  amount 
of  modification. 
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In  this  thesis,  the  results  of  current  work  is  examined 
and  the  most  accurate  library  interface  is  identified.  For 
this  work,  the  interface  is  defined  as  the  set  of  parameters 
that  most  clearly  define  a  software  component  thus  making 
its  retrieval  possible. 

To  demonstrate  the  feasibility  of  this  task,  a  partial 
implementation  of  a  software  library  is  given.  The  data 
manipulated  is  the  set  of  parameters  used  to  describe  each 
member  of  the  software  library  (hereafter  referred  to  as  the 
repository) .  Identifying  the  most  efficient  method  to  store 
components  is  a  topic  for  future  research. 

The  concept  of  this  implementation  follows  the  basic 
structure  proposed  by  Kazerooni-Zand,  Samadzadeh,  and  George 
[KS90 ] .  In  their  work,  they  deal  with  reuse  at  the  object 
code  level.  Their  system  involves  three  major  subsystems. 
The  Identification  Mechanism  ( IDM)  is  designed  to  select 
those  components  that  meet  a  programmer's  need.  The 
Software  Control  Mechanism  (SCM)  is  designed  to  provide 
access  to  different  versions  of  a  program  or  component;  it 
receives  input  from  the  IDM.  The  Interface  is  designed  to 
act  as  a  pre  and  post  compiler;  it  coordinates  the  micro- 
incremental  compilation  between  their  Reuse  of  Persistent 
Code  and  Object  Code  system  and  the  compiler  [KS90]. 

This  thesis  deals  only  with  the  action  taking  place 
within  the  IDM.  The  interface  will  be  the  parametrization 
of  the  detailed  description  of  all  components  in  the 


software  repository. 
Kazerooni-Zand  et  al 
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In  terms  of  the  system  defined  by 
.  [KS90],  this  is  the  Software  Attribute 
Datable.  The  level  of  reuse  in  this  work  is  restricted  to 
source  code. 


CHAPTER  II 


LITERATURE  REVIEW 

"Software  reuse"  is  the  taking  of  any  code  or  code 
segment  and  using  it  again  to  meet  a  specific  need. 

"Software  reusability"  involves  not  only  the  reuse  of 
software,  but  also  how  that  software  is  designed.  In  other 
words,  it  involves  designing  software  components  to  be 
totally  self-contained  needing  no  outside  code  to  accomplish 
their  task,  or  if  help  is  needed,  knowing  where  to  find  it. 
Each  component  should  be  easily  modifiable  to  meet  a 
potential  user's  need. 

As  stated  by  Biggerstaff  and  Perlis,  "software  reuse  is 
the  reapplication  of  a  variety  of  kinds  of  knowledge  about 
one  system  to  another  similar  system  in  order  to  reduce  the 
effort  of  development  and  maintenance  of  that  other  system" 
[BP89a].  Reusability  can  mean  the  reuse  of  ideas  as  well  as 
the  reuse  of  components.  So  when  an  algorithm  is  used 
repeatedly,  the  algorithm  is  being  reused. 

According  to  Biggerstaff  and  Perlis  [BP89a],  software 
reuse  has  been  in  use  for  a  number  of  years  to  a  limited  and 
informal  extent.  In  many  cases,  it  is  limited  to  the 
knowledge  of  an  earlier  system  that  is  similar  to  the 
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current  project,  or  modules  from  other  projects  or  systems 
that  lend  themselves  to  accomplishing  a  specific  task. 

Reuse  figures  have  been  reported  as  high  as  80%,  but  on 
average  the  figure  is  considered  to  be  much  lower,  possibly 
as  low  as  5%.  Other  items  of  reuse  such  as  life-cycle 
objects  (requirements,  designs,  and  test  plans)  have  even 
lower  rates  of  reuse  [FG89]  [FG90]. 

Portability  can  be  considered  a  subarea  of  reusability. 
Portability  is  defined  in  general  terms  as  "running  a 
program  in  a  host  environment  that  is  somehow  different  from 
the  one  for  which  it  was  designed"  [JA88]. 

Portability  became  popular  with  the  advent  of  the  C 
programming  language  though  it  was  an  issue  long  before  the 
appearance  of  C.  As  early  as  the  late  1950's  and  early 
1960's,  COBOL  was  defined  as  a  standard  business  language. 
Two  corporations  developed  compilers  late  in  1960  and 
exchanged  code  [JA88].  With  a  minimum  number  of 
modifications,  the  code  ran  on  both  machines.  However,  just 
because  a  piece  of  code  is  written  in  COBOL  or  C  (i.e.,  a 
"portable"  language) ,  it  does  not  mean  the  program  is 
necessarily  portable  [JA88],  Likewise,  because  a  portion 
of  a  program  is  reused,  it  does  not  mean  that  the  code  is 
reusable  in  the  sense  of  software  reusability. 

Basili  approaches  software  reuse  from  the  viewpoint  of 
software  maintenance  [BA90].  He  details  three  models  that 
can  be  used  during  the  process  of  updating  an  old  system 
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.jhile  using  the  old  code  as  a  bank  of  reusable  code  to 
create  the  new  system.  These  three  models  are  described 
below. 

The  "quick-fix"  model  uses  the  existing  system.  Modi¬ 
fications  are  made  to  the  source  code  and  documentation  as 
necessary. 

The  "iterative-enhancement"  model  is  designed  to  be 
used  when  all  the  requirements  of  the  system  are  not  known 
or  the  developer  is  not  capable  of  building  the  full  system. 
This  model,  which  is  well-suited  to  software  maintenance, 
also  starts  with  the  existing  system  together  with  its 
requirements  and  documentation.  It  is  an  evolutionary 
process  that  allows  for  updating  and  redesigning  of  the 
system  based  on  analysis  of  the  system  as  the  work 
progresses. 

The  "full-reuse"  model  begins  with  the  requirements  of 
the  new  system  and  uses  components  of  the  old  system  as 
needed  along  with  other  components  that  may  be  in  the 
software  repository.  This  model  assumes  that  the  existing 
components  are  well  documented  or  that  they  are  documented 
as  they  are  added  to  the  repository  [BA90] . 

Basili  does  not  go  into  the  detail  of  cataloging  the 
components  for  his  models.  However,  in  the  case  of  the  full 
reuse  model,  a  catalog  interface  describing  each  member  in 
the  set  of  components  to  be  used  for  the  reuse  project  could 
enhance  the  model's  usefulness. 
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Different  Approaches  to  Reusability 

Various  concepts  of  software  reusability  have  been 
presented  by  researchers.  Prieto-Diaz  and  Freeman  present  a 
software  classification  scheme  used  to  catalog  pieces  of 
software  for  future  use  [PF87].  The  scheme  enables  the  user 
to  give  parameters  for  a  search  and  then  the  system  selects 
and  recommends  software  modules  that  match  or  closely  match 
the  parameters.  The  parameters  are  part  of  the  interface 
used  for  the  presented  system. 

Prieto-Diaz  and  Freeman's  scheme  is  divided  into  two 
major  areas:  functionality  and  environment.  Each  area  is 
further  subdivided  into  three  parameters.  Functionality  is 
described  by  function,  objects,  and  medium.  Function  is 
self-explanatory;  it  describes  what  the  software  does,  i.e., 
the  action.  Object  describes  the  objects  manipulated  by  the 
function,  and  medium  describes  the  data  structure (s)  or 
device (s)  that  the  function  uses. 

The  environment  is  broken  down  into  system  type,  func¬ 
tional  area,  and  setting.  The  system  type  "refers  to  func¬ 
tionally  identifiable,  application-independent  modules, 
usually  including  more  than  one  component."  Functional  area 
describes  "application-dependent  activities  usually  defined 
by  an  established  set  of  procedures."  And  the  setting 
describes  "where  the  application  is  exercised"  [PF87]. 

The  facets  of  this  scheme  form  a  sextuple  that 
describes  the  respective  components  in  the  software  reposi- 
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tory.  To  insure  a  uniform  meaning  for  the  sextuple,  vocabu 
lary  control  is  imposed  to  facilitate  comparisons.  A 
thesaurus  is  used  to  convert  all  of  the  definitions  to 
descriptive  words  of  like  meaning.  This  lends  consistency 
to  the  comparisons. 


Figure  1.  A  Partial  Weighted  Conceptual  Graph  for  the 
Function  Facet. 


A  partially  weighted  graph  (Figure  1)  is  used  to  help 
identify  a  closely  related  term  when  one  of  the  members  of 
the  sextuple  is  not  found.  The  graph  is  a  DAG,  Directed 
Acyclic  Graph,  with  each  of  the  nodes  being  "supertypes  that 
denote  general  concepts  relating  two  or  more  terms"  [PF87]. 
Weights  are  assigned  to  the  edges  using  a  software 
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engineering  perspective;  the  closer  the  perceived  proximity 
of  the  terms,  the  lower  the  weight  assigned  to  the  edge 
connecting  the  two  terms.  When  a  query  is  made  and  a  term 
is  not  matched,  the  graph  is  consulted  to  find  closely 
matching  terms,  and  this  gives  the  user  a  set  of  closely 
related  components  to  choose  from. 

To  define  the  software  components  further,  Kazerooni- 
Zand,  Samadzadeh,  and  George  start  with  Prieto-Diaz  and 
Freeman's  faceted  scheme  and  add  the  implementation 
environment.  It  is  composed  of  two  elements:  language  and 
machine  [KS90] . 

The  Reuse  of  Persistent  Code  and  Object  Code  (ROPCO) , 
the  system  proposed  by  Kazerooni-Zand,  Samadzadeh,  and 
George,  deals  with  reuse  at  a  very  low  level.  Machine 
dependency  becomes  much  more  important  when  attempting  the 
reuse  of  object  code  as  compared  with  source  code. 

The  ROPCO  system  is  composed  of  three  major  subsystems: 
the  Identification  Mechanism  (IDM) ,  the  Software  Control 
Mechanism  (SCM) ,  and  the  Interface.  The  function  of  the  IDM 
is  to  identify  and  select  the  programs  or  modules  that  meet 
the  user  or  programmer's  requirements.  Each  element  in  the 
system  has  a  record  in  the  Software  Attribute  Database 
(SADB) .  This  record  is  a  unique  identifier  to  its  assigned 
element  and  is  used  throughout  the  ROPCO  system  to  identify 
a  particular  element.  The  IDM  prompts  the  user  for  the 
functional  and  environment  attributes  as  defined  by  Prieto- 
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Diaz  and  Freeman  [PF87],  and  the  implementation  environment 
as  defined  by  Kazerooni-Zand  et  al.  [KS90].  Using  the 
attributes  input  by  the  user,  the  SADB  is  accessed  and  one 
or  more  elements  are  chosen;  the  selections  are  based  on  the 
descriptions  in  the  SADB  and  the  proximity  distance  model 
[ PF87 ] . 

Kernighan  uses  the  UNIX1  system  as  an  example  of  an 
environment  that  facilitates  reusability.  By  using  system 
utilities,  he  proposes  that  one  can  build  more  complicated 
programs  and  utilities  using  shell  scripts  or  the  source 
code  of  the  system  utilities  [KE84]. 

Caldiera  and  Basili  approach  software  reusability  by 
splitting  the  traditional  life  cycle  models  into  two  parts. 
The  first  part  is  the  project  and  the  second  is  the  factory 
[CB91] .  The  project  delivers  the  software  system  to  the 
customer.  As  a  need  for  a  component  is  developed  by  the 
project,  it  is  sent  to  the  factory.  The  factory  deals  with 
extracting  and  packaging  reusable  components.  It  also  has 
to  have  a  detailed  knowledge  of  the  project  it  is 
supporting. 

In  their  system,  all  components,  which  are  selected  for 
possible  addition  to  the  software  repository,  go  through  a 
two-phase  evaluation.  Phase  one,  the  identification  phase, 
consists  of  three  steps:  the  definition  of  the  reusability 

1UNIX  is  a  trademark  of  AT&T. 
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attributes  model,  extraction  of  the  component,  and 
application  of  the  model.  Phase  two,  the  component 
qualification  phase,  is  composed  of  six  steps:  generation 
of  the  functional  specification;  generation  of  the  test 
cases;  classification  of  the  component;  development  of  the 
reuser's  manual;  storage;  and  feedback. 

Phase  one  is  automated  using  software  models  and 
metrics.  Components  that  pass  this  phase  are  analyzed  by  a 
domain  expert.  Any  component  whose  functional  specification 
is  not  relevant,  or  is  incorrect,  is  thrown  away.  The 
reason  for  eliminating  the  component  is  documented;  this 
aids  in  the  development  of  future  reusable  components. 

A  component  is  then  run  through  a  series  of  tests  that 
are  based  on  its  functional  specification.  If  the  tests  are 
failed,  then  once  again  the  component  is  discarded  and  the 
reason  is  documented.  At  this  point,  any  component  that  has 
survived  is  classified  and  documented  for  reuse.  Each 
component  is  made  an  autonomous  unit  capable  of  being 
compiled  without  the  addition  of  other  files;  any 
information  that  may  have  resided  in  other  files  (C  include 
files  for  example)  would  have  to  be  included  in  the 
component  [ CB9 1 ] . 

Purtilo  and  Atlee  [PA90]  introduced  a  language  called 
NIMBLE  that  is  used  to  ease  the  introduction  of  reusable 
modules  into  new  applications.  With  NIMBLE,  the  difference 
between  parameter  orders  is  removed.  NIMBLE  provides 
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parameter  coercion  capabilities  without  changing  the  source 
code  of  a  module.  The  actual  and  formal  parameter  lists  are 
referred  to  as  interface  patterns.  A  mapping  from  the 
actual  parameter  list  to  a  new  "parametric"  takes  place  to 
meet  the  needs  of  the  module  being  called  [PA90]. 

One  of  the  motivations  for  the  design  of  NIMBLE  was  the 
likelihood  that  modules  that  are  semantically  identical,  but 
may  be  structurally  different,  are  likely  to  become  more 
prevalent  as  reusable  software  systems  are  developed. 

NIMBLE  can  be  used  to  bridge  the  module  interface  gap  and 
also  it  can  widen  the  domain  to  which  a  module  can  be 
applied  [PA90]. 

Frakes  and  Gandel  [FG89]  [FG90]  discuss  various  methods 
of  representing  reusable  software  components  including 
library  science,  knowledge  based  methods,  and  hypertext 
techniques.  They  define  representation  "as  a  language 
(textual,  graphical,  or  other)  used  to  describe  a  set  of 
objects"  [FG89]. 

The  faceted  classification  scheme  of  Prieto-Diaz  and 
Freeman  [PF87]  falls  under  the  category  of  library  science. 
To  compensate  for  the  narrow  focus  of  an  enumerated  system 
such  as  the  Dewey  Decimal  System,  faceted  schemes  allow  a 
subject  area  to  be  broken  down  into  fundamental  parts. 

These  parts  can  then  be  synthesized  to  develop  more 
descriptive  representations  [FG89]. 
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Commercial  component  libraries  such  as  GRACE  (Generic 
Reusable  ADA  Components  for  Engineering)  do  exist.  For 
instance,  GRACE  allows  a  user  to  choose  from  a  list  of  ADA 
packages  to  accomplish  common  tasks  such  as  managing  stacks 
and  queues.  It  uses  a  knowledge  engineering  approach  to 
represent  the  software  modules  [FG89]. 

Chatterbox  ,  a  graphical  user  interface  library 
available  from  Courseware  Applications,  Inc.,  is  a  library 
of  graphic  routines  for  the  C  language.  It  performs  the 
dirty  work  to  create  menu  bars  with  pull-down  menus  and 
dialog  boxes  with  keyboard  and  mouse  support  using  the 
graphics  routines  of  the  supported  compilers.  The  user 
decides  what  (s)he  wants  and  then  includes  the  necessary 
routines  in  his/her  code.  The  routines  are  described  in  the 
Chatterbox  reference  manual.  There  is  not  an  automated 
method  available  to  pull  routines  together;  the  user  must 
decide  what  (s)he  wants  by  looking  at  the  manual  or  by  using 
past  experience  with  the  library.  The  user  then  goes  to  the 
Chatterbox  source  code  and  selects  the  necessary  module  or 
modules  [SC90] . 


Reusability  in  Practice 

Prieto-Diaz  [PR91]  states  that  a  classification  scheme 
for  reusable  software  must  meet  the  following  criteria: 

2Chatterbox  is  a  trademark  of  Courseware  Applications, 


Inc. 
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1.  It  must  accommodate  continually  expanding 
collections,  a  characteristic  of  most  software 
organizations , 

2.  It  must  support  finding  components  that  are 
similar,  not  just  exact  matches, 

3.  It  must  support  finding  functionally  equivalent 
components  across  domains, 

4.  It  must  be  very  precise  and  have  high  descriptive 
power  (both  are  necessary  conditions  for 
classifying  and  cataloging  software) , 

5.  It  must  be  easy  to  maintain,  that  is,  add,  delete, 
and  update  the  class  structure  and  vocabulary 
without  any  need  to  reclassify, 

6.  It  must  be  easily  usable  by  both  the  librarian  and 
end  user,  and 

7.  It  must  be  amenable  to  automation. 

Prieto-Diaz  [PR91]  has  worked  with  large  corporations 
such  as  GTE  Data  Services  (GTE  DS)  and  the  CONTEL  Technology 
Center.  While  working  at  GTE  DS,  a  14  percent  reuse  factor 
with  a  savings  of  1.5  million  dollars  reportedly  has  been 
realized  the  first  year.  A  library  "asset"  was  defined  as 
any  facility  that  could  be  reused  in  the  production  of 
software  with  the  initial  emphasis  being  reusable  software 
components.  It  was  found  that  38  percent  of  the  190  assets 
in  the  library  the  first  year  were  being  "actively  reused." 
The  majority  of  the  items  in  the  library  were  components 
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with  greater  than  10,000  lines  of  code;  the  larger  components 
provided  a  greater  savings  when  reused.  The  faceted  scheme 
was  more  effective  in  "domain  specific  collections  than  for 
broad,  heterogeneous  collections." 

In  his  work  at  CONTEL,  domain-specific  reusable 
software  repositories  were  established.  The  library  system 
at  CONTEL  was  developed  to  enable  its  easy  integration  into 
existing  environments.  This  is  an  example  of  a  library 
system  that  would  be  capable  of  being  instantiated  into 
multiple  environments. 

To  encourage  the  use  of  the  repository,  monetary 
incentives  were  used  to  motivate  the  programmers,  referred 
to  as  authors  or  asset  providers,  to  write  their  software 
with  reusability  in  mind,  and  to  submit  the  new  material  for 
inclusion  in  the  repository. 


CHAPTER  III 


PROTOTYPE  IMPLEMENTATION 

General  Overview 

The  main  focus  of  this  thesis  is  a  prototype 
implementation  of  a  software  library.  The  prototype  can  be 
used  to:  (a)  catalog  software  components  using  the  faceted 
cataloging  scheme  presented  by  Prieto-Diaz  and  Freeman 
[ PF87 ] ,  and  (b)  retrieve  components  from  a  software 
repository.  This  implementation  is  used  to  catalog 
components  at  the  source  code  level  (other  possibilities 
include  the  specification,  design,  and  object  code  levels) . 

The  system  has  three  major  sub-sections:  adding 
components,  guerying  the  system  for  candidate  components, 
and  the  common  vocabulary  or  thesaurus.  This  system  works 
within  the  confines  of  the  Identification  Mechanism  (IDM)  as 
defined  by  Kazerooni-Zand  et  al.  [KS90]. 

Concept  of  the  Design 

The  prototype  was  implemented  using  the  C  programming 
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language  on  an  IBM  PC/AT3  compatible.  Microsoft  Quick  C 
compiler  Version  2.5  was  used  for  all  coding  and  compiling. 

The  prototype  requires  eight  supporting  data  files. 

The  common  vocabulary  (hereafter  referred  to  as  the 
thesaurus)  is  contained  in  seven  data  files  with  the  eighth 
file  being  the  Software  Attribute  Database  (SADB)  as  defined 
by  Kazerooni-Zand  et  al.  [KS90].  Each  facet  has  its  own 
thesaurus  data  file.  The  facets  used  for  this  prototype  and 
the  associated  file  names  of  their  respective  thesauruses 
are  shown  in  TABLE  I.  The  thesaurus  file  for  language  is 
included  for  information  only;  language  is  not  used  as  a 
parameter  during  queries. 


TABLE  I 

FACETS  WITH  FILE  NAMES 


function 

object 

medium 

system  type 

functional  area 

setting 

language 


funct . ths 
object. ths 
medium. ths 
systype. ths 
funcarea. ths 
setting. ths 
lang. ths 


Each  line  of  a  file  is  a  comma-delimited  list  of 
descriptors  with  the  first  word  on  the  line  being  the 


3 IBM  PC/AT  is  a  trademark  of  International  Business 
Machines  Corp. 
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primary  descriptor  of  that  line.  TABLE  II  shows  a  subset  of 
the  "function"  common  vocabulary.  The  first  word  of  each 
line  is  the  primary  descriptor  that  will  be  used  to  define  a 
component  for  this  facet  for  all  components  described  by  one 
of  the  descriptors  on  that  line.  Given  the  set  of 
descriptors  "add, increment, total, sum"  from  the  "function" 
thesaurus  file,  the  user  could  enter  any  of  the  words  as  a 
legal  input.  If  a  user  enters  the  word  "sum,"  the  thesaurus 
searches  the  data  file  of  the  respective  facet.  When  sum  is 
found,  "add"  is  substituted  for  the  user's  input. 


TABLE  II 

SAMPLE  THESAURUS  ENTRIES 


add , i ncrement , tota 1 , sura 
close , release , detach, disconnect , free 
compare , test, relate , match, check, verify 
complement , negate , invert 

measure , count , advance , size , enumerate , list 


The  thesaurus  is  accessed  every  time  a  user  enters  a 
descriptor  (i.e.,  during  cataloging  and  making  queries).  If 
the  user  enters  a  word  not  included  in  the  thesaurus,  (s)he 
is  presented  with  a  list  from  which  to  choose. 

All  of  the  supporting  database  functions  are  provided 
by  source  code  reused  from  an  earlier  academic  project  (16 
percent  of  the  total  lines  of  code  are  reused) .  Each  of  the 
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data  files  are  indexed  and  accessed  using  inverted  lists. 
With  each  data  file,  there  are  three  supporting  files. 
TABLE  III  shows  the  data  files  with  their  respective 
supporting  files  and  TABLE  IV  gives  the  purpose  of  each  of 
the  data  files. 


TABLE  III 


NAMES  OF  THE  DATA  FILES 
WITH  SUPPORTING 
FILE  NAMES 


Data  File 

Word  File 

Inverted  List 

Inverted  List  Index 

ru . dta 

ru. wrd 

ru. inv 

ru . vdx 

funct . ths 

funct .wrd 

funct. inv 

funct . vdx 

object. ths 
medium. ths 

object. wrd 
medium. wrd 

object. inv 
medium. inv 

object .vdx 
medium. vdx 

systype . ths 
funcarea. ths 

systype. wrd 
funcarea. wrd 

systype. inv 
funcarea. inv 

systype . vdx 
funcarea. vdx 

setting. ths 
lang. ths 

setting. wrd 
lang. wrd 

setting. inv 
lang. inv 

setting. vdx 
lang. vdx 

TABLE 

FILE  EXTENSION 

IV 

DEFINITIONS 

File  Extension 

Definition 

.wrd  contains  all  words  in  the  data  file 

with  their  line  numbers  that  are  used 
to  create  the  inverted  list 


.  inv  an  inverted  list  for  the  data  file 

.vdx  the  index  fin-  for  the  inverted  list 
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The  thesaurus  was  developed  with  the  intended  use  of 
cataloging  Operating  Systems  II  class  projects  and  their 
components  as  entries.  This  is  a  domain-specific 
implementation  as  was  the  implementation  used  at  CONTEL  by 
Prieto-Diaz  [PR91] .  It  is  possible  to  change  the  domain 
orientation  by  changing  the  common  vocabulary  in  the 
thesaurus  data  files. 

For  this  prototype  implementation,  the  vocabulary 
consists  of  those  terms  needed  to  define  the  set  of  software 
components  used  as  sample  input.  The  list  was  limited  to 
those  terms  needed  to  give  an  adequate  sampling  of  the 
programs  usefulness.  Developing  a  comprehensive  vocabulary 
for  the  operating  systems  domain  is  beyond  the  scope  of  this 
thesis. 


User  Interface 

The  prototype  has  three  major  sub-sections:  adding 
components,  querying  the  system  for  candidate  components, 
and  the  common  vocabulary  or  thesaurus . 

The  system  is  menu  driven  with  the  video  display 
partitioned  into  multiple  text  windows.  With  few 
exceptions,  pressing  one  key  is  all  that  is  required  to 
maneuver  through  the  program.  Figure  2  shows  the  opening 
menu  where  the  user  is  presented  with  three  choices.  Each 
of  the  prompts  are  self-explanatory. 
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Softuare  Repository. 

(fi)dd  a  conponent  to  the  systen . 
(Q)uery  the  systen  for  a  conponent. 
(E)xit  to  DOS. 

tlahe  your  selection  — 


Figure  2.  Software  Library  Program  Opening  Menu. 


After  electing  to  add  a  component  to  the  repository, 
the  user  is  prompted  for  the  component  name;  the  system  must 
be  able  to  find  the  component  before  it  can  be  added  to  the 
repository.  When  the  system  is  ready  for  the  user  to  assign 
attributes  to  the  module,  the  user  will  see  the  screen  shown 
in  Figure  3 . 

Attributes  are  entered  as  prompted.  After  all  the 
descriptors  have  been  input,  the  user  is  given  a  chance  to 
make  changes.  When  the  descriptors  are  accepted,  the 
component  will  be  added  to  the  system.  No  maintenance  is 
required  for  this  phase  of  the  system. 

When  the  user  chooses  Q  at  the  opening  menu,  the  system 
updates  the  Software  Attribute  Database  (SADB)  to  insure 
that  additions  are  included.  The  entering  of  attributes  for 


a  query  is  done  exactly  as  assigning  attributes  to  a  new 
component . 
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At  each  of  the  following  prompts,  enter  the  attribute  that  beat 
describes  this  nodule  or  press  ENTER  to  choose  from  a  list. 

cpu .  c 


1.  Function: 


Assigning  attributes 
FUNCTION  is  the  action  of  the  component. 


Figure  3.  Data  Entry  Screen. 


When  the  list  of  desired  attributes  has  been  accepted, 
SADB  is  searched  for  all  components  that  meet  one  or  more  of 
the  desired  attributes.  After  all  exact  matches  are 
displayed,  the  user  is  presented  with  a  message  at  the 
bottom  of  the  screen  containing  a  component  name  and  the 
percentage  of  the  attributes  matched.  The  user  can  make  the 
decision  to  view  or  bypass  a  component. 

After  all  the  possible  candidates  have  been  viewed  or 
passed  by,  the  user  is  asked  if  (s)he  wants  to  keep  the  list 
of  candidates.  If  a  negative  response  is  given,  the  list  is 
discarded  and  the  program  returns  to  the  main  menu.  If 
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accepted,  the  user  is  prompted  for  a  file  name  and  up  to  two 
lines  of  comments.  Then  the  candidates  with  their 
attributes  are  dumped  into  the  given  file.  While  viewing 
the  result  of  a  system  query,  the  user  can  press  D  and  the 
system  will  display  the  facet  definition  at  the  bottom  of 
the  screen. 

During  the  assigning  of  attributes  and  while  making 
queries  of  the  system,  the  thesaurus  is  available  by 
pressing  the  ENTER  key.  When  the  key  is  pressed,  a  list  of 
possible  choices  for  the  current  facet  is  displayed  on  the 
right  side  of  the  screen.  Also,  if  the  user  enters  a 
descriptor  not  included  in  the  common  vocabulary,  a  list 
will  appear  on  the  right  side  of  the  screen.  By  selecting  a 
letter  corresponding  to  one  of  the  given  choices,  the 
program  inserts  the  selected  descriptor.  N  and  P  are 
pressed  to  get  the  next  and  previous  lists  (see  Figure  4) . 

The  user  cannot  make  any  changes  to  the  software 
repository  from  inside  the  program  except  for  the  addition 
of  modules.  To  delete  components  from  SADB,  any  ASCII  text 
editor  can  be  used.  Each  new  line  in  the  data  file  named 
ru.dta  is  a  set  of  component  descriptors.  The  line  is  a 
comma-delimited  list  containing  the  component  name, 
function,  object,  medium,  system  type,  functional  area, 
setting,  and  language  in  that  order.  A  ninth  entry  may  be 
present  if  the  user  has  assigned  a  custom  attribute  from  a 
user-supplied  thesaurus  file.  To  delete  a  component  from 
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SADB,  the  user  must  find  the  line  containing  its  name  and 
delete  it.  The  next  time  the  system  is  used  to  make  a 
query,  the  SADB  supporting  files  will  be  updated 
automatically . 


At  each  of  the  following  pronptsi  enter  the  attribute 
describes  this  nodule  or  press  ENTER  to  choose  Iron  a 

cpu  .c 

that  best 

1 1st. 

Choose 

fron  the  gluen  list. 

A 

•  NOT  APPLICABLE 

Press  N 

for  the  next  1 1st  or  P 

for  the  previous 

list. 

B 

array 

C 

buffer 

D 

cards 

1.  Function: 

execute 

E 

character 

2.  Object1 

instruction 

F 

disk 

3.  Nediun: 

G 

double 

H 

f  1  le 

1 

f  loat 

J 

Integer 

K 

Job 

L 

keyboard 

Assigning  attributes 

NEDlun 

refers  to  entitles  that 

serve  as  locales 

where 

the  action  takes  place. 

Figure  4.  Data  Entry  Screen  with  Thesaurus. 


To  update  one  of  the  common  vocabulary  lists,  any  ASCII 
text  editor  can  be  used.  The  thesaurus  entries  are  stored 
in  a  comma-delimited  list  with  the  first  word  of  the  list 
being  the  primary  key  for  that  particular  set  of 
descriptors.  Each  line  of  descriptors  must  be  terminated 
with  a  carriage  return  (new  line  character,  "\nM) .  The  user 
can  add  or  delete  lines  of  descriptors.  Also  the  user  can 
add  to  or  delete  from  the  existing  words.  After  changes  are 
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made,  at  least  one  of  the  supporting  files  for  the  particular 
facet  must  be  deleted.  The  next  time  the  thesaurus  accesses 
the  list  for  the  updated  facet,  its  supporting  files  will  be 
updated . 


Sample  Queries 

The  test  data  for  this  prototype  implementation 
consists  of  components  of  varying  lengths  and  purposes. 
Programs,  of  three  programmers  from  a  graduate  level 
operating  systems  course,  were  broken  into  code  segments  of 
varying  sizes  based  on  each  programmer's  comments.  A  total 
of  forty-three  components  were  cataloged  using  the 
prototype. 

Components  range  in  size  from  three  lines  (simple 
string  manipulations)  to  more  than  700  lines.  Some  of  the 
larger  modules  consist  of  multiple  C  functions  that  work  in 
concert  to  accomplish  an  assigned  task;  in  other  cases,  a 
module  consists  of  a  single  function  (some  containing  more 
that  250  lines  of  code) .  As  expected,  it  was  found  that  the 
smaller,  more  specialized  the  component,  the  easier  it  was 
to  classify. 

Using  the  program  specification  [SA91]  that  was  used  to 
develop  the  programs  in  the  data  set,  a  set  of  queries  were 
developed  to  find  components  to  meet  the  requirements  of  the 
principal  routines:  loader,  memory,  cpu,  spooler,  and 
scheduler  (shown  in  order  in  TABLE  V) .  The  queries  were 
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performed  using  four  and  six  facets.  Because  this  is  a 
domain-specific  implementation,  the  system  type  and  setting 
facets  were  omitted  from  one  set  of  queries.  This  was  done 
to  determine  if  the  removal  of  the  aforementioned  facets 
changed  the  results  of  the  queries  measurably.  There  is  a 
small  set  of  components  of  a  generic  nature  that  can  be  used 
in  any  setting  or  system  type  as  needed;  however,  in  this 
sampling,  their  presence  is  insignificant. 


TABLE  V 

SAMPLE  SYSTEM  QUERIES 


Function 

Object 

Medium 

System  Type 

Funct .  Area 

Setting 

load 

job 

operating  system 

job  io 

academi c 

access 

memory 

array 

operating  system 

memory  management 

academic 

execute 

instruction 

i nteger 

operating  system 

processing 

academic 

reads 

card  stack 

operating  system 

job  io 

academi c 

schedule 

jobs 

operating  system 

scheduling 

academi c 

As  can  be  seen  in  TABLE  V,  the  medium  column  is  not 
used  in  every  query.  If  a  dominant  medium  could  not  be 
identified  in  a  component  during  the  cataloging  of  the 
component  or  in  a  component's  specification,  as  in  the  case 
of  the  queries  in  TABLE  V,  it  was  omitted. 
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Query  Results 

To  accomplish  a  partial  validation  of  this  prototype 
implementation,  ten  sample  queries  were  completed;  five 
queries  using  four  facets  (function,  object,  medium, 
functional  area) ,  and  five  queries  using  six  facets 
(function,  object,  medium,  system  type,  functional  area, 
setting) .  The  language  facet  was  not  used  as  a  descriptor 
for  queries  because  all  of  the  components  in  the  system  are 
written  in  the  same  ''ang.  -*ge,  so  this  facet  would  not 
provide  any  useful  information  during  a  query. 

Because  the  prototype  finds  every  component  in  the 
system  that  meets  one  or  more  facets,  the  queries  using  six 
facets  list  some  candidate  components  that  meet  only  the 
system  type  and  setting,  or  both.  In  this  domain-specific 
implementation  with  the  given  data  set,  these  facets  do  not 
provide  any  useful  information.  TABLE  VI  gives  a  summary  of 
the  number  of  components  found  using  both  four  and  six 
facets . 

The  left  column  of  TABLE  VI  shows  the  number  of 
attributes  matched  (i.e.,  if  six  attributes  are  entered  as  a 
query,  "Exact”  indicates  an  exact  match  of  all  the  requested 
attributes;  -1  indicates  that  five  attributes  are  matched; 

-2  indicates  that  four  attributes  are  matched;  etc.). 

Columns  s-^  through  s5  give  the  number  of  components  found  in 
samples  1  through  5  for  the  given  number  of  facets. 
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TABLE  VII  shows  at  what  point  a  search  should  be 
considered  successful.  As  previously  stated,  the  prototype 
delivers  all  components  that  meet  one  or  more  of  the 
requested  attributes.  At  some  point,  the  components 
returned  are  of  little  or  no  value  because  of  the  particular 
facets  matched.  Because  the  results  are  based  solely  on 
attributes  matched,  an  additional  or  alternate  method  must 
be  developed  to  discriminate  between  the  particular  facets 
matched.  This  is  a  topic  for  future  study.  But  for  the 
purposes  of  this  prototype,  any  component  that  is  returned 
that  contains  two  or  more  mismatched  attributes  should  be 
discarded.  The  components  represented  in  TABLE  VII  above 
the  double  line  should  be  considered  valid  candidates,  those 
below,  invalid. 
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TABLE  VI 

SUMMARY  OF  QUERIES 


TABLE  VII 

SUMMARY  OF  VALID  AND  INVALID  QUERIES 


Four  Facets 

Six  Facets 

S1 

S2 

S3 

S4 

s5 

S1 

s2 

s3 

s4 

S5 

Exact 

2 

3 

— 

2 

2 

2 

3 

— 

2 

2 

-1 

2 

— 

3 

— 

— 

2 

— 

3 

— 

— 

-2 

3 

— 

2 

— 

3 

4 

— 

2 

1 

3 

-3 

— 

3 

4 

— 

— 

14 

3 

2 

15 

16 

-4 

— 

— 

— 

— 

— 

— 

13 

13 

— 

— 

—  O 

Total 

7 

6 

9 

2 

5 

22 

19 

1 

21 

18 

21 

CHAPTER  IV 


SUMMARY  AND  FUTURE  WORK 

The  aim  of  this  thesis  was  to  identify  an  accurate 
software  catalog  interface  capable  of  correctly  identifyinc 
software  components  and  hence  enabling  their  retrieval.  The 
vehicle  used  to  accomplish  this  was  a  partial,  prototypical 
implementation  of  a  software  library. 

Using  the  faceted  cataloging  scheme  of  Prieto-Diaz  and 
Freeman  [PF87]  in  a  domain-specific  library,  it  was  decided 
that  two  facets  (system  type  and  setting)  should  be 
eliminated  from  the  query  process.  This  is  due  to  the 
narrowness  of  the  focus  of  the  domain.  As  was  reported  in 
Chapter  III,  within  the  sample  domain  of  this  thesis,  the 
results  were  the  same  with  or  without  the  use  of  the  system 
type  and  setting  for  valid  queries. 

The  interface  developed  as  part  of  this  thesis  can  be 
instantiated  into  different  domains  by  changing  the 
vocabulary.  Also,  it  can  be  used  at  different  levels  of 
reuse  other  than  source  code  such  as  design,  specification, 
or  object  code  levels. 

In  order  to  validate  the  prototype  fully,  it  must  be 
installed  in  an  industrial  setting  to  verify  its  performance 
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over  time.  A  system  librarian  would  enhance  the  usefulness 
of  the  library  by  standardizing  component  descriptions.  The 
program  itself  is  easy  to  use,  but  the  task  of  defining  the 
software  components  is  a  time-consuming  effort;  time  that  a 
typical  programmer  may  not  care  to  expend  (invest)  to 
accomplish  the  task  correctly.  Programmers  would  have  to  be 
encouraged  to  develop  their  components  with  reusability  in 
mind  as  was  done  at  GTE  DS  and  CONTEL  [PR91]. 

To  enhance  the  usefulness  of  this  prototype 
implementation,  the  maintenance  functions  need  to  be 
automated.  Also,  the  system  needs  a  method  to  refine  the 
results  of  the  queries.  The  user  should  be  given  an 
indicator  of  the  complexity  required  to  modify  the  component 
to  meet  his/her  need. 

Future  study  is  needed  to  determine  the  method  used  to 
store  components  ("assets"  as  defined  by  Prieto-Diaz  [PR91]) 
most  efficiently.  Data  compression  may  be  one  method  to 
integrate  into  this  prototype  in  its  current  form. 

For  the  concept  of  reusability  to  become  a  widespread 
reality,  it  will  require  dedicated  software  librarians  to 
accomplish  the  task  of  managing  the  repositories  that  will 
grow  with  time.  This  may  open  other  specialized  areas 
within  the  field  of  computer  science. 
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SOFTWARE  REPOSITORY 


USER'S  GUIDE 


1.  General  Overview 

This  program  is  used  to  catalog  software  components 
using  the  faceted  cataloging  scheme  presented  by  Ruben 
Prieto-Diaz  and  Peter  Freeman  [PF87],  and  to  retrieve 
components  from  the  software  repository.  This 
implementation  is  aimed  at  cataloging  components  at  the 
source  code  level.  The  system  has  three  major  sub-sections: 
adding  components,  querying  the  system  for  candidate 
components,  and  the  common  vocabulary  or  thesaurus. 

2.  Adding  Components 

At  the  opening  menu,  you  will  be  presented  with  three 
choices  as  follows. 


The  Opening  Menu 


bfe06W«f?€ 


tuare  Repository , 


(A) dd  a  con  portent,  to  the  system  . 
(Q)uery  the  system  For-  a  component  , 

(B) xlt  to  DOS. 

Make  ynur  selection  - 
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Choose  A  to  add  a  component  to  the  repository.  The  prompts 
are  self-explanatory.  Next  you  will  be  prompted  for  the 
component  name;  the  system  must  be  able  to  find  the 
component  before  allowing  it  to  be  added  to  the  repository. 
When  the  system  is  ready  for  you  to  assign  attributes  to  the 
module,  you  will  see  the  following  screen. 


Attribute  Assignment  Screen 


At  each  of  the  following  prompts,  enter  the  attribute 
describes  this  nodule  or  press  ENTER  to  choose  fron  a 

that  best 

1  ist. 

cpu.c 

i.  Function: 

Assigning  attributes 

FUNCTION  is  the  action  of  the  component. 

Enter  the  attributes  as  prompted.  After  all  the  descriptors 
have  been  input,  you  can  make  any  changes.  When  you  accept 
the  entered  list  of  descriptors,  your  component  will  be 
added  to  the  system. 
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3.  Making  Queries  of  the  System 

From  the  opening  menu  choose  Q.  The  system  will  then 
update  the  Software  Attribute  Database  (SADB)  to  insure  that 
the  additions  can  be  found.  When  making  a  query,  enter  the 
desired  attributes  just  as  you  did  when  adding  a  component 
to  the  repository. 

When  you  have  accepted  the  list  of  desired  attributes, 
SADB  is  searched  for  all  components  that  meet  one  or  more  of 
the  desired  attributes.  After  all  exact  matches  are 
displayed,  a  message  will  appear  at  the  bottom  of  the  screen 
containing  a  component  name  and  the  percentage  of  the 
attributes  matched.  If  you  wish  to  view  the  components 
attributes,  press  Y.  After  all  the  possible  candidates  have 
been  view  or  passed  by,  you  will  be  asked  whether  you  want 
to  keep  the  list  of  candidates.  If  you  decline,  the  list  is 
discarded  and  you  are  returned  to  the  main  menu.  If  you 
accept,  you  are  prompted  for  a  file  name  and  up  to  two  lines 
of  comments.  Subsequently,  the  candidates  with  their 
attributes  are  dumped  into  the  file  you  have  entered.  While 
viewing  the  result  of  a  system  query,  you  can  press  D  and 
the  system  will  display  the  facet  definition  at  the  bottom 
of  the  screen. 

4.  Using  the  Thesaurus 

During  the  assigning  of  attributes  and  while  making 
queries  of  the  system,  the  thesaurus  is  available  by 
pressing  the  ENTER  key.  When  the  key  is  pressed,  a  list  of 


possible  choices  for  the  current  facet  is  displayed  on  the 
right  side  of  the  screen.  Also,  If  you  enter  a  descriptor 
not  included  in  the  common  vocabulary,  a  list  will  appear  on 
the  right  side  of  the  screen.  Select  the  letter 
corresponding  to  your  choice  and  the  program  will  insert  it 
for  you.  You  may  press  N  or  P  to  get  the  next  or  previous 
lists. 


Facet  Options  for  the  Attributes 


At  each  of  the  following  pronptsi  enter  the  attribute 
describes  this  nodule  or  press  ENTER  to  choose  fron  a 

cpu.c 

that  best 
list. 

Choose  fron  the  given  list. 

A 

»  NOT  APPLICABLE 

Press  N  for  the  next  list  or  P 

for  the  previous  list. 

B 

array 

C 

buffer 

D 

cards 

1.  Function- 

execute 

E 

character 

2 .  Object : 

instruction 

F 

disk 

3.  Ned  tun-' 

G 

double 

H 

file 

1 

float 

J 

integer 

K 

job 

L 

keyboard 

Assigning  attributes 

NEDllfl  refers  to  entities  that 

serve  as  locales  where  the  action  takes  place. 

5.  Miscellaneous 


You  cannot  make  any  changes  to  the  software  repository 
from  inside  the  program  except  for  the  addition  of  modules. 
To  update  the  common  vocabulary  or  to  delete  components  from 
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the  system,  see  the  System  Administrator's  Guide  (Appendix 
B)  . 

You  may  develop  your  own  additional  facet,  if  you  so 
desire,  to  further  define  your  software  component (s) .  To  do 
this,  you  need  an  ASCII  text  editor.  Give  the  file  whatever 
name  you  desire.  In  the  file,  arrange  the  descriptors  so 
that  each  new  line  contains  a  new  set  of  descriptors  as 
shown  below. 


SAMPLE  THESAURUS  ENTRIES 


add , increment , tota 1 , sum 
close, release, detach, disconnect, free 
compare , test , relate , match , check , verify 
complement , negate , invert 

measure , count , advance , s ize , enumerate , 1 ist 


Each  line  must  be  terminated  with  a  carriage  return.  As  the 
C  programming  language  is  case  sensitive,  all  searches  of 
the  descriptors  are  done  in  lowercase.  Only  the  first  word 
of  the  line  can  contain  both  upper  and  lowercase  letters. 
Make  sure  the  first  word  is  the  way  you  want  is  displayed. 
All  remaining  letters  and  words  on  the  line  should  be  in 
lower  case  to  facilitate  the  search  routines. 

During  the  assigning  of  attributes  or  while  making  a 
query,  you  will  be  presented  with  an  eighth  prompt: 

"Other.”  At  this  prompt  enter  the  user-defined  facet.  The 
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program  will  then  prompt  you  for  the  file  name  of  the  file 
containing  the  common  vocabulary  for  this  facet.  It  is  also 
possible  to  assign  a  second  attribute  from  one  of  the 
program  thesaurus  files  by  entering  the  proper  file  name  at 
the  prompt. 


APPENDIX  B 

SOFTWARE  REPOSITORY  SYSTEM  ADMINISTRATOR'S  GUIDE 
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SOFTWARE  REPOSITORY 
SYSTEM  ADMINISTRATOR’S  GUIDE 

1.  General  Overview 

This  program  is  used  to  catalog  software  components 
using  the  faceted  cataloging  scheme  presented  by  Ruben 
Prieto-Diaz  and  Peter  Freeman  [PF87],  and  to  retrieve 
components  from  the  software  repository.  This 
implementation  is  aimed  at  cataloging  components  at  the 
source  code  level.  The  system  has  three  major  sub-sections: 
adding  components,  querying  the  system  for  candidate 
components,  and  the  common  vocabulary  or  thesaurus. 

2 .  Adding  Components 

At  the  opening  menu,  the  user  is  presented  with  three 
choices  as  follows. 


44 


45 


Choice  A  is  for  adding  a  component  to  the  repository.  The 
prompts  are  self-explanatory.  Next  the  user  is  prompted  for 
the  component  name;  the  system  must  be  able  to  find  the 
component  before  it  can  be  added  to  the  repository.  When 
the  system  is  ready  for  the  user  to  assign  attributes  to  the 
module,  the  user  will  see  the  following  screen. 


Attribute  Assignment  Screen 


At  each  of  the  following  pronpts,  enter  the  attribute 
describes  this  nodule  or  press  ENTER  to  choose  fron  a 

that  best 
list. 

cpu  .c 

1.  Function: 

Assigning  attributes 

FUNCTION  is  the  action  of  the  conponent. 

The  user  enters  the  attributes  as  prompted.  After  all  the 
descriptors  have  been  input,  the  user  can  make  changes. 
When  the  descriptors  are  accepted,  the  component  will  be 
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added  to  the  system.  No  maintenance  is  required  for  this 
phase  of  the  system. 

3.  Making  Queries  of  the  System 

Once  the  user  chooses  Q  at  the  opening  menu,  the  system 
updates  the  Software  Attribute  Database  (SADB)  to  insure 
that  the  additions  are  included.  The  entering  of  attributes 
for  a  query  is  done  exactly  as  assigning  attributes  to  a  new 
component.  When  the  list  of  desired  attributes  has  been 
accepted,  SADB  is  searched  for  all  components  that  meet  one 
or  more  of  the  desired  attributes.  All  exact  matches  are 
displayed  automatically.  Subsequently,  the  user  is 
presented  with  a  message  at  the  bottom  of  the  screen 
containing  a  component  name  and  the  percentage  of  the 
attributes  matched.  The  user  can  make  the  decision  to  view 
a  component  based  on  the  number  of  attributes  matched. 

After  all  the  possible  candidates  have  been  view  or 
passed  by,  the  user  is  asked  if  (s)he  wants  to  keep  the  list 
of  candidates.  If  a  negative  response  is  given,  the  list  is 
discarded  and  the  program  returns  to  the  main  menu.  If 
accepted,  the  user  is  prompted  for  a  file  name  and  up  to  two 
lines  of  comments.  Subsequently,  the  candidates  with  their 
attributes  are  dumped  into  the  file.  While  viewing  the 
result  of  a  system  query,  the  user  can  press  D  and  the 
system  will  display  the  facet  definition  at  the  bottom  of 


the  screen. 
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4.  Using  the  Thesaurus 

During  the  assigning  of  attributes  and  while  making 
queries  of  the  system,  the  thesaurus  is  available  by 
pressing  the  ENTER  key.  When  the  key  is  pressed,  a  list  of 
possible  choices  for  the  current  facet  is  displayed  on  the 
right  side  of  the  screen.  Also,  if  the  user  enters  a 
descriptor  not  included  in  the  common  vocabulary,  a  list 
will  appear  on  the  right  side  of  the  screen.  By  selecting  a 
letter  corresponding  to  one  of  the  given  choices,  the 
program  inserts  the  selected  attribute.  N  and  P  are 
presented  to  get  the  next  and  previous  lists. 


Facet  Options  for  the  Attributes 


fit  each  of  the  follouing  pronpts.  enter  the  attribute  that  best 
describes  this  nodule  or  press  EMTER  to  choose  fron  a  list. 

cpu.c 

Choose  fron  the  giuen  list. 

A  *  MOT  APPLICABLE 

Press  M  for  the  next  list  or  P  for  the  preuious  list. 

B  array 

C  buffer 

D  cards 

1.  Function^  execute 

E  character 

2.  Object:  instruction 

F  disk 

3.  Medium: 

G  double 

H  file 

I  f loat 

J  integer 

K  Job 

L  keyboard 

Assigning  attributes 

MEDIUM  refers  to  entities  that  serue  as  locales  uhere  the  action  takes  place. 
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5.  Updating  SADB 

NOTE:  The  user  cannot  make  any  changes  to  the  software 

repository  from  inside  the  program  except  for  addition  of 
modules.  It  is  recommended  that  the  user  not  make  any 
deletions  from  SADB. 

For  deletion  of  components  from  SADB,  use  any  ASCII 
text  editor.  Each  new  line  in  the  data  file  named  ru.dta  is 
a  set  of  component  descriptors.  The  line  is  a  comma- 
delimited  list  containing  the  component  name,  function, 
object,  medium,  system  type,  functional  area,  setting,  and 
language  in  that  order.  A  ninth  entry  may  be  present  if  the 
user  has  assigned  a  custom  attribute  from  a  user  supplied 
thesaurus  file. 

To  delete  a  component  from  SADB,  find  the  line 
containing  its  name  and  delete  it.  The  next  time  the  system 
is  used  to  make  a  query,  the  SADB  supporting  files  will  be 
updated  automatically. 

6.  Updating  the  Thesaurus/ Common  Vocabulary 

NOTE:  It  is  recommended  that  the  user  not  be  allowed  to 

make  changes  to  the  thesaurus  data  files  to  avoid 
compromising  the  integrity  of  the  supporting  thesaurus. 

To  update  one  of  the  common  vocabulary  lists,  use  any 
ASCII  text  editor.  The  thesaurus  entries  are  stored  in  a 
comma-delimited  list  with  the  first  word  of  the  list  being 
the  primary  key  for  that  particular  set  of  descriptors. 

Each  line  of  descriptors  must  be  terminated  with  a  carriage 
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return.  It  is  recommended  that  the  System  Administrator 
perform  all  additions  and  deletions.  After  changes  are 
made,  at  least  one  of  the  supporting  files  for  the 
particular  facet  must  be  deleted.  The  next  time  the 
thesaurus  accesses  the  list  for  the  updated  facet,  its 
supporting  files  will  be  updated.  The  facets  used  for  this 
program  and  the  associated  file  names  of  their  respective 


thesauruses  are: 


function 
object 
medium 
system  type 
functional  area 
setting 


funct . ths 
object. ths 
medium. ths 
systype. ths 
funcarea. ths 
setting. ths 


A  thesaurus  file  for  language  (lang.ths)  is  included  for 
information  only;  language  is  not  used  as  a  parameter  during 
queries. 


NAMES  OF  THE  DATA  FILES  WITH  THEIR  SUPPORTING  FILES 


Data  File 

Wrd  File 

Inverted  List 

Inverted  List  Index 

ru . dta 

ru . wrd 

ru . inv 

ru . vdx 

funct. ths 

funct. wrd 

funct. inv 

funct . vdx 

object . ths 
medium. ths 

object .wrd 
medium. wrd 

object. inv 
medium. inv 

object. vdx 
medium. vdx 

systype . ths 
funcarea . ths 

systype. wrd 
funcarea. wrd 

systype . inv 
funcarea . inv 

systype .vdx 
funcarea .vdx 

setting. ths 
lang.ths 

setting. wrd 
lang. wrd 

setting . inv 
lang . inv 

setting. vdx 
lang. vdx 
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Below  are  the  purposes  and  contents  of  the  supporting  files. 

.wrd  -  contains  all  words  in  the  data  file  with  their  line 
numbers  that  are  used  to  create  the  inverted  list 

. inv  -  an  inverted  list  for  the  data  file 

.vdx  -  the  index  file  for  the  inverted  list 


APPENDIX  C 

PROGRAM  SOURCE  CODE  LISTING 
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/* 


*  PROGRAMMER:  JOE  E. 


SWANSON 


*  COMSC  5000  Thesis  and  Research 

*  Summer  1991 


*/ 


/*  ru . h  * / 

#include  <stdio.h> 
#include  <string.h> 
#include  <stdlib.h> 
#include  <graph.h> 

enum  color  { 

Black, 

Blue, 

Green, 

Cyan, 

Red, 

Magenta, 

Brown , 

White, 

Dgray, 

Lightblue, 

Lgreen, 

Lcyan, 

Lred, 

Lightmagenta, 

Yellow, 

Bwhite, 

}; 


enum  < 


Buf_size 

= 

257, 

/*  buffer  size  */ 

FW 

= 

25, 

/*  field  width  */ 

LEN 

= 

81, 

Required 

= 

1, 

Optional 

= 

2, 

>; 

typedef 

enum  {  FALSE 

: , TRUE 

>  BOOLEAN; 

void  screens (int 

screen) ; 

#def ine 

els 

clearscreen  (  GCLEARSCREEN) 

#def ine 

clw 

clearscreen  (  GWINDOW) 

#def ine 

gotoxy 

settextposition 

#def ine 

ot 

outtext 

#define  windowO 


settextwindow( 1 , 1,25,80) ;  \ 
_settextcolor (White) 


#define  menuwindow 


screens(9) ;  _settextwindow( 7 ,15,18,65) ;\ 
_settextcolor (White) 

#define  windowmsg  screens(8);  _settextwindow(23, 1, 25, 80) ;\ 

_settextcolor ( Cyan ) 

screens(l);  _settextwindow( 1, 1, 4, 80) ;  \ 

_settextcolor (White) 
settextwindow( 6, 1, 8 , 59 ) ;  \ 
settextcolor ( Light_magenta ) 
settextwindow( 10, 10, 21 , 59 ) ;  \ 
_settextcolor( Yellow) 

screens(7);  _settextwindow( 6, 61, 21, 80) ;  \ 
_settextcolor ( Bwhite ) 

settextwindow( 6, 1, 21, 18 ) ;  \ 

_settextcolor ( Lcyan ) 
settextwindow( 6, 19 , 21 , 38) ;  \ 

_settext color (Lred) 
settextwindow(6,39,21,59) ;  \ 

_settextcolor (White) 


#define  Read 
#define  Write 
#define  Append 
#define  Hline 


typedef  struct  invert  ( 
char  key [ FW ] ; 
long  offset; 

>  INVERTNDX; 

typedef  struct  component  { 

char  comp_name[LEN] ,  /*  component  name  */ 

function [LEN, 
object [LEN] , 
medium [LEN] , 
system_type [ LEN ] , 
funct_area[LEN] , 
setting [LEN] , 
language [LEN] , 
other [ LEN ] ; 

>  COMPONENT; 

BOOLEAN  chg_attribute (COMPONENT  *,char); 

BOOLEAN  respond( void) ; 

char  *8gets(char  *string,int  length, char  *stream) ; 

int  check_path(char  inputf],  char  varname[],  int  flag); 

void  attr_def ( int ) ; 


#define  window4 
#define  window5 
#define  window6 


#define  windowl 
#define  window2 
#define  window3 
#define  windowthes 


void  get_attr{int  row, char  attr(],char  facet[],char  thesdta[]); 
void  hyper (char  [],  char  (]); 

void  open_file(FILE  **,  char  [],  char  [],  char  []); 
void  query(char  if name( ] , char  invf ile[ ] , char  vdxfile[]); 
void  sort (char  input(J); 

void  thesaurus (char  code, char  key[],char  dtafile(]); 
void  trap(int,  char  (],  char  (]); 
void  unique(char  f ile_name( ] ) ; 


char  otext[LEN]; 


/*  global  string  for  outtext  */ 
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/* 

*  PROGRAMMER:  JOE  E.  SWANSON 

* 

*  COMSC  5000  Thesis  and  Research 

*  Summer  1991 
*/ 

#include  "ru.h" 

#include  <conio.h> 

#define  cbuffer  10001 

/*  FUNCTION  PROTOTYPES  */ 

BOOLEAN  chg_att r ibute ( COMPONENT  * , char ) ; 

BOOLEAN  does_exist (char  []); 

BOOLEAN  respond ( void ) ; 

char  menu (void); 

char  *read_attr (char  [],  char  []); 

COMPONENT  *read_attributes(char  *,  COMPONENT  *); 

void  add_component (void) ; 
void  assign_attributes(char  *,  char  *); 
void  attr_def ( int ) ; 
void  db_update ( void ) ; 

void  get_attr(int  row, char  attr(),char  facet[],char  thesdtaj]); 
void  get_other_f ilename(char  name[LEN)); 

void  invert(char  inputf ile[ ] ,char  invf ile[ ) , char  vdxfile[]); 
void  thesaurus (char  code, char  key[],char  dtafile[]); 

^*********************************************************************** 
********************************  MAIN  ******************************** 

******  v<  ***************************************************************** 

* 

*  This  program  prompts  the  user  for  an  input  file.  If  the  file  exists, 

*  then  the  user  is  asked  if  the  input  file  has  been  assigned  attributes. 

*  If  a  negative  response  is  given,  the  user  is  prompted  for  the 

*  attributes,  else  the  module  is  added  to  the  system. 

* 

***********************************************************************  j 

void  main (void) 

{ 

BOOLEAN  add_flag  =  TRUE;  /*  set  when  component  added  */ 

els; 

_wrapon  (_GWRAPOFF) ;  /*  truncate  at  window's  edge  */ 

/*  look  for  DOS  sort.exe  */ 

check_path( "sort.exe" , "PATH" ,  1 ) ; 

/*  if  no  components  have  been  previously  added  go  directly  to 
*  add_component  * / 
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i f  ( lcheck_path( "ru. dta” , "" /Optional ) ) 

( 

_ot("The  reuse  database  is  empty."); 

_ot(”  Do  you  wish  to  add  components?  [Y/N]  " ) ; 
gotoxy(l,70) ; 

i f ( respond ( ) )  add_component ( ) ; 
else  exit (0 ) ; 

> 

if  (checJ^pathC'ru.dta” , /Optional ) )  ; 
else 

{  /*  components  have  not  been  added  */ 

els ; 

exit (0 ) ; 

> 

while  (TRUE) 

{ 

els; 

switch(menu( ) ) 

{ 

case  'A' : 
els; 

add_flag  =  TRUE; 
addeomponent ( ) ; 
els; 
break; 

case  ' E ' : 
els; 

window^ ; 

_ot(”Do  you  want  to  exit  to  the  operating  system?  (Y/N]  "); 
gotoxy ( 1 , 53 ) ; 
if  (respond()) 

{ 

windowO ; 
els; 

exit(0) ; 

> 

break; 

case  ’Q’ : 
els ; 

if  (add_f lag)  /*  CREATE/UPDATE  supporting  files  */ 

{ 

db_update( ) ; 
add_f lag  =  FALSE; 

> 

/*  begin  processing  the  query  */ 
query( "ru.dta" ,  "ru.inv",  "ru.vdx" ); 
break; 
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default:  break; 

}  / *  switch  */ 

}  /*  while  */ 

}  /*  main 

***********************************************************************y 

/*********************************************************************** 
************************  chg_attribute  ******************************* 

★★a********************************************************************* 

* 

*  This  function  is  called  if  an  entered  attribute  is  to  be  changed. 

* 

***********************************************************************/ 
BOOLEAN  chg_attribute( COMPONENT  ^current , char  flag) 

{ 

char  buf  f er [ LEN ] ; 
int  x; 

windowl ; 
clw; 

windowmsg ; 
clw; 

window3 ; 
gotoxy (9,1); 

_ot ( "Are  the  above  attributes  correct?  [Y/N]  "); 
gotoxy (9 , 42 ) ; 
if  ( respond ( ) ) 
x  =  FALSE; 
else 
{ 

windowl ; 

_ot( "Enter  the  attribute  that  best  describes  this  facet  of  the  "); 
_ot ( " component . " ) ; 
window3 ; 
gotoxy ( 11,1); 

_ot( "Enter  the  number  of  the  attribute  to  change  —  "); 
bufferfO]  =  (char)  getche(); 
gotoxy (11,1); 

_ ot ( ”  ”  )  ; 

x  =  atoi (buf fer) ; 
gotoxy (x, 1)  ; 

_ot ( ”  ”  )  ; 

switch(x) 

{ 

case  1: 

get_attr ( 1, current->f unction, "Function: " , "f unct . ths" ) ; 
break; 

case  2: 

get_attr(2,current->object, "Object: ", "object. ths” ) ; 
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break; 
case  3: 

get_attr  (3,current->medium,  ’’Medium:  ",  "medium. ths" )  ; 
break; 

case  4: 

get_attr (4,current->system_type, "System  Type: ", "systype.ths" ) ; 
break; 

case  5: 

get_attr(5,current->funct_area, "Functional  Area: ”, 

"funcarea.ths" ) ; 

break; 
case  6: 

get_attr (6, current->setting, "Setting: ” , "setting. ths" ) ; 
break; 

case  7: 

if  (flag  ==  ’ a ' ) 

get_attr(7,current->language, "Language: ”, "lang.ths” ) ; 
break; 

case  8: 

bufferfO]  =  ’ \0' ; 

get_attr (8, current ->other, "Other: ", buffer) ; 

default:  break; 

)  /*  switch  */ 

x  =  TRUE; 

}  /*  else  */ 

return  x; 

}  /*  change  attribute 

ft**********************************************************************. 
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*  This  function  does  a  linear  search  through  the  software  attribute 

*  database  to  determine  if  the  inputfile  previously  existed  or  if  an 

*  identical  file  name  is  found. 

* 

***********************************************************************y 
BOOLEAN  does_exist (char  fname[]) 

{ 

BOOLEAN  flag  =  FALSE; 
char  *ptr,  line[Buf_size] ; 

FILE  * f p; 

openf ile( &fp,Read, "ru. dta" , "does_exist " ) ; 

while  ( fgets (line,Buf_size, fp)  !=  NULL) 

{ 

ptr  =  strtok( line, " , " ) ; 
if  (strcmp(f name, ptr)  ==  0) 

{ 

windowl ; 
clw; 

sprintf (otext , "Component  %s  previously  added.  SKIPPING ! \n" , 

fname) ; 

_ot (otext) ; 

sprintf (otext , "press  any  key  to  continue..."); 

_ot ( otext ) ; 
getch ( ) ; 
flag  =  TRUE; 
break; 

} 

> 

fclose ( f p) ; 
return  flag; 

>  / *  does  exist 
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^*********************************************************************** 
****************************  respond  ********************************* 
************************************************************************ 
★ 

*  This  function  prompts  the  user  for  a  Y  or  N  response. 

* 

***********************************************************************/ 
BOOLEAN  respond (void) 

{ 

char  x; 

struct  rccoord  oldpos;  /*  catch  current  cursor  position  */ 

oldpos  =  _gettext position ( ) ; 

do 

{ 

x  =  (char)  toupper(getche( ) ) ; 
gotoxy( oldpos. row, oldpos. col) ; 

} 

while  ((x)  ! =  'N'  &&  (x)  !=  'Y'); 
return  (x  ==  'Y')  ?  TRUE  :  FALSE; 

}  /*  respond 

***********************************************************************/ 

/*********************************************************************** 
*****************************  menu  *********************************** 
************************************************************************ 
* 

*  This  function  places  a  menu  on  the  screen.  The  users  choice  is 

*  returned. 

* 

*********************************************************************;  '  j 

char  menu (void) 

{ 

menuwindow; 

_ot ( "Software  Repository."); 
gotoxy (5,1); 

_ot("(A)dd  a  component  to  the  system."); 
gotoxy (7,1); 

_ot("(Q)uery  the  system  for  a  component."); 

gotoxy (9, 1 ) ; 

_ot ( " ( E ) xit  to  DOS."); 

gotoxy (12,1); 

_ot("Make  your  selection  —  "); 
return  (char)  toupper (getche( ) ) ; 
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}  /*  menu 

★★a-********************************************************************/ 

/*********************************************************************** 
***************************  r e  ad_at t  r  ******************************** 

★ 

*  This  function  reads  one  attribute  from  the  buffer.  The  attribute  is 

*  returned  to  the  calling  module. 

* 

***********************************************************************y 
char  *read_attr(char  buf fer [ ] , char  sep[ J ) 

{ 

char  input [FW], 

*pchar , 
ch; 

if  (buffer [ 0 ]  1=  '  ,*) 

{ 

pchar  =  strstr (buf fer, sep) ; 
pchar++; 

> 

else 

{ 

pchar  =  strstr ( buf f er, ; 
pchar++; 

} 

/*  read  data  */ 

if  (buffer[0]  1= 

strcpy(input,strtok(buffer,sep) ) ; 
else 

strcpy( input, "  "); 
strcpy (buf fer, pchar) ; 
return  input; 

>  /*  read  attr 


/******************************************************************** 
*************************  read  attributes  ************************* 

**y  ♦**■!»**★*★*★★*★★*★★***★★★**★★★****★****★★★*****★****★★★★★★*★★****★★ 
* 

*  This  function  reads  the  attributes  from  the  beginning  of  the  input 

*  file.  The  attribute  data  file  is  checked,  if  the  file  is  not 

*  currently  in  the  database,  it  will  be  added.  The  attributes  are 

*  passed  back  via  the  formal  parameter  list. 

* 

a******************************************************************** 

COMPONENT  *read_attributes(char  *f name, COMPONENT  *new) 

{ 

static  char  buf fer [ Buf_size ] , 

*pchar,  /*  char  pointer  */ 

*temp; 

char  ch  =  ' \0 ' ; 

int  x,  /*  number  of  bytes  read  by  fread  */ 

i; 

FILE  * fp; 

open_f ile(&fp,Read, fname, ”read_attributes" ) ; 
x  -  fread  (buffer, l,Buf_size-l, fp) ; 
fclose ( fp) ; 

pchar  =  strstr (buf fer , "  ");  /*  remove  opening  comment  */ 

pchar++ ; 

strcpy (buffer, pchar ) ; 

/*  read  component  name  */ 
for  (i  =  0;  i  <  30;  i++)  new->comp_name [ i )  =  buffer[i]; 

temp  =  strtok( new->comp_name, " , ” ) ; 

/*  check  to  see  if  exist  in  module  */ 

pchar  =  strstr ( fname, temp) ; 

if  (pchar  !=  NULL) 

{ 

strcpy ( new->comp_name, readattr (buf fer ,”,")); 
strcpy ( new->f unction, read_attr ( buf fer ,",")); 
strcpy ( new->object, read_attr (buf fer, ”,”)); 
strcpy(new->medium,read_attr(buffer, ",”)); 
strcpy (new->system_type, read_attr (buf fer , ",")); 
strcpy (new->funct_area, read_attr (buf fer , ",")); 
strcpy(new->setting, read_attr (buf fer, ",”)); 
strcpy(new->language, read_attr (buf fer, ”,")); 
strcpy (new->other, read_attr (buffer, ”,")); 

} 

else 

{ 

windowl ; 
clw; 

_ot("The  specified  module  does  not  contain  parameters . \n” ) ; 
new  =  NULL; 
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> 

return  new; 

>  /*  read  attributes 

*********************************************************************** ^ 

/*********************************************************************** 
*************************  add_component  ****************************** 
★★★*★★★★**★*★****★*★★★*★★★★★*★*★*****★****★★***★★*********************** 

★ 

*  This  function  is  called  when  a  component  is  being  added  to  the  system. 

*  It  calls  the  necessary  functions  for  attribute  assignment,  reading  of 

*  the  attributes  from  the  module,  and  adding  the  new  info  to  the  system 

*  information. 

* 

★***★****************★*************************************************/ 
void  add_component ( void ) 

{ 

BOOLEAN  exist; 
char  ifname[LEN], 

*pchar , 

path[LEN],  drive[3],  dir [3],  fname[9],  ext [5], 
added [ Bu  f  _s i ze ]  =  " " ; 
static  char  buf fer [cbuffer] ; 

COMPONENT  current, 

*curr  =  NULL; 

FILE  * f p; 
int  x,  i  =  0; 

static  int  col  =  1,  row  =1; 

while  (TRUE) 

{ 

windowl ; 
clw; 

/*  prompt  user  for  file  name  */ 

gotoxy( 1,1); 

_ot( "Enter  the  name  of  the  new  component:  "); 
f f lush( stdin) ; 
gets ( path) ; 

strlwr (path) ;  /*  change  to  lowercase  */ 

/*  change  \  to  /  to  avoid  escape  char  in  path  */ 
while  ((pchar  =  strstr(path, "\\" ) )  !=  NULL) 
pchar[0]  =  ' / ' ; 

while ((fp  =  f open (path, Read ) )  ==  NULL) 

{ 

windowl; 

clw; 

_ot("New  component  cannot  be  found.  Enter  new  component  \ 
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name . \n" ) ; 

_ot("(You  may  need  to  include  the  correct  path.  (Q)uit)"); 
gotoxy (1 , 60) ; 
f flush(atdin) ; 
gets (path) ; 
atrlwr (path) ; 

/*  change  \  to  /  to  avoid  escape  char  in  path  */ 
while  ( (pchar  =  strstr (path, "\\" ) )  5=  NULL) 
pchar(O)  =  ' / '  ; 

if  (path[0)  ==  'q' ) 
return; 

> 

fcloseall ( ) ; 

_splitpath(path,  drive,  dir,  fname,  ext); 
strcpy (if name, fname) ; 
strcat ( if name, ext ) ; 

if  ((exist  =  does_exist(ifname) )  ==  FALSE) 

{ 

assign_attributes (path,  ifname); 

curr  =  read_attributes  ( ifname,  Sicurrent ) ; 


if  (lexist  &&  curr  1=  NULL) 

{ 

open_f ile ( &f p, "a+" , "ru.dta" , "read_attributes" ) ; 
fprintf ( fp, "%s , %s, %s, %s, %s, %s, %s, %s,  %s\n” , current . comp_name, 
current . function , current . object , current . medium, 
current . system_type , current . f unct_area , current . setting, 
current . language, current .other ) ; 
fclose(fp) ; 
window2 ; 
gotoxy ( 1,1); 

sprintf (otext , "%-14 . 14s  ", ifname) ; 
strcat ( added , otext ) ; 

_ot ( added ) ; 
col  +=  15; 
if (col  >=  45) 

{ 

strcat ( added, "\n" ) ; 
col  =0; 

> 

if  (strlen (added)  >  165) 
added (0  J  =  ’\0'; 

} 

windowl ; 
clw; 

_ot("Do  you  wish  to  add  another  component?  [ Y / N ]  "); 
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gotoxy ( 1,47) ; 
if  (lrespond())  break; 


>  /*  add  component 

***********************************************************************  j 

y*********************************************************************** 
************************  assign  attributes  *************************** 
************************************************************************ 
★ 

*  This  function  takes  a  module  that  has  not  been  assigned  attributes  and 

*  prompts  the  user  for  the  appropriate  attribute  definitions.  The 

*  attributes  are  appended  to  the  beginning  of  the  input  file. 

* 

★  ★★a*******************************************************************  j 

void  ass ign_attributes (char  *path,  char  *inputfile) 

{ 

COMPONENT  current; 

static  char  buf fer [cbuf fer) , 

*pchar, 

newf ile [ LEN ]  = 

FILE  *fp,  *ifp; 
int  x; 

windowl ; 
clw; 

_ot ( "At  each  of  the  following  prompts,  enter  the  attribute  that  \ 
best\n” ) ; 

_ot ( "describes  this  module  or  press  ENTER  to  choose  from  a  list."); 
gotoxy (4, 1) ; 

_ot ( input file) ; 

window3 ; 
gotoxy (21,1) ; 

_ot( "Assigning  attributes"); 

get_attr ( 1, current . function, "Function: " , "funct . ths" ) ; 

get_attr (2, current . object, "Object: " , "object .ths" ) ; 

get_attr (3 , current .medium, "Medium: ” , "medium. ths" ) ; 

get_attr (4, current . system_type, "System  Type: " , "systype. ths" ) ; 

get_attr( 5, current. funct_area, "Functional  Area: " , "funcarea.ths" ) ; 

get_attr ( 6, current. setting, "Setting: " , "setting. ths" ) ; 

get_attr ( 7 , current . language, "Language: " , "lang.ths" ) ; 

get_attr (8, current .other, "Other: " , newf ile) ; 

windowl ; 
clw; 

while  (chg_attribute(&current, ' a ' ) ) ; 
clw; 
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open_f ile (&fp, Write, "work" , "assign_attributes" ) ; 
fprintf ( fp, " /*  %s, %s, %s, %s, %s, %s , %s, %s, %s,  */\n" , inputf ile, 
current . function, current . object , current . medium, 
current . system_type , current . f unct_area , current . setting , 
current. language, current .other ) ; 

open_f ile (&ifp, Read, path, "assign_attributes" ) ; 

while((x  =  fread(buf fer, l,cbuf fer, ifp) )  !=  0) 
fwrite(buf fer,x, 1, fp) ; 

f close ( ifp) ; 
f close ( fp) ; 

if  (strcmp( path, inputf ile)  ==  0) 
unlink ( input  file) ; 

rename  ("work",  input f i le ) ; 

>  /*  assign  attributes 

***********************************************************************/ 

/*********************************************************************** 
***************************  open_f ile  ******************************** 

♦A********************************************************************** 

★ 

*  This  procedure  opens  the  input  and  output  files  for  this  program. 

* 

★**********************************************************************y 
void  open_f ile (FILE  **fp,char  type(],char  name[],char  module[1) 

{ 

/ *  open  input  and  output  files  */ 
if  ((*fp  =  f open (name, type ) )  ==  NULL) 

{ 

windowO ; 
els; 

trap( 1001, name, module) ; 
exit ( 1001 ) ; 

} 

}  /*  open_file  */ 
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/★★★★★a***************************************************************** 

***************************  error  traps  ****************************** 

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★a******************** 

★ 

*  This  function  produces  an  error  message  when  the  input  string  does 

*  not  match  one  of  those  specified  in  the  program  specification.  This 

*  function  is  called  by  modules  listed  in  the  error  messages. 

* 

***********************************************************************/ 
void  trap(int  code,  char  filename!),  char  module!)) 

{ 

fprintf ( stderr , "\n==>  ERROR\n" ) ; 

switch (code) 

{ 

case  1001  :  fprintf ( stderr , "INPUT/OUTPUT  FILE  NOT  \ 

FOUND ( IO  1001 ) . \n” ) ; 

fprintf ( stderr , "File  \"%s\”  not  found  in  function  \ 

\”%s . \”\n” , filename, module) ; 

break; 

case  2001  s  fprintf (stderr, ”\nFile  not  properly  sorted ( %s2001 ).  \ 
\n\n" , module) ; 

break; 

/*  not  used  yet 

case  3001  ;  fprint f ( stderr , ”\n  ( 3001 ) . \n\n” ) ; 
break; 

case  3002  ;  fprintf ( stderr , "\n  (3002 ) . \n\n" ) ; 
break; 

case  4001  :  fprint f ( stderr , "\n  (4001 ) . \n\n” ) ; 
break; 

case  4002  :  fprintf ( stderr , ”\n  ( 4002 ) . \n\n" ) ; 
break; 


case  5001 

*/ 

default  : 


f print f ( stderr, ”\n  ( 5001 ) . \n\n” ) ; 
break; 

fprintf (stderr, "*********  FATAL  ERROR 

exit ( 999 ) ; 

break; 


******** \n\n\n" ) ; 


}  /*  switch  */ 


>  /*  trap  */ 


p 
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I  ******************** 

*★★★****★***★★*  ****** 

* 

*  This  function  lists 

★ 

★*★★***★★★*★*★★★*★★** 
void  attr_def(int  n) 

{ 

windowmsg; 
clw; 

switch(n) 

{ 

case  1: 

_ot ( "FUNCTION  is  the  action  of  the  component . \n" ) ; 
break; 

case  2: 

_ot( "OBJECT  is  the  object  manipulated  by  the  component . \n" ) ; 
break; 

case  3: 

_ot( "MEDIUM  refers  to  entities  that  serve  as  locales  where  "); 
_ot("the  action  takes  place. \n” ) ; 
break; 

case  4: 

_ot( "SYSTEM  TYPE  refers  to  functionally  identifiable,  ”); 

_ot ( "application-independent\n” ) ; 

_ot ( "modules .  Usually  includes  >  1  component . \n” ) ; 
break; 

case  5: 

_ot( "FUNCTIONAL  AREA  describes  application-dependent  \ 
activities. \n" ) ; 
break; 

case  6: 

_ot( "SETTING  describes  where  the  component  is  exercised . \n" ) ; 
break; 

case  8: 

_ot("You  may  enter  a  user  defined  facet  now."); 
break; 

default:  break; 

}  /*  switch  */ 
window3; 

>  /*  attr_def 


*************************************************** 
**  attribute  definitions  ************************ 

the  definitions  of  the  respective  attributes. 
************************************************** ^ 


***********************************************************************/ 


69 


/*********************************************************************** 
***************************  get  attr  ********************************* 
★**★*★★★★****★*****★****★***★*★★*****★★★★*★★*★★******★★★★★★★************ 
★ 

*  This  function  prompts  the  user  and  returns  the  value  input.  All 

*  modifications  to  the  input  value  are  completed  before  it  is  returned. 

* 

***********************************************************************/ 
void  get_attr(int  row, char  attr[],char  facet[],char  thesdta[]) 

{ 

attr_def ( row) ; 
window3; 
gotoxy ( row, 1 ) ; 

sprintf (otext, "%i.  %-18s",row, facet) ; 

_ot ( otext ) ; 
f f lush(stdin) ; 
gets ( attr ) ; 
attr[FW]  =  '\0'; 
strlwr ( attr ) ; 

if  (row  ==  8  &&  attr [0]  !=  ’\0'  &&  attr[0]  !=  •*•) 

get_other_f ilename(thesdta) ;  /*  get  other  definitions  */ 

if  (thesdta[0]  1=  '\0')  /*  if  file  iexist,  return  */ 
thesaurus! ‘s', attr, thesdta) ; 
else  attr[0]  =  '\0'; 

attr_def (row) ; 
gotoxy (row, 1) ; 

_ ot  (  “ 

gotoxy (row, 1 ) ; 
sprintf (otext, 

_ot ( otext ) ; 

>  /*  get  attr 

***********************************************************************/ 

/*********************************************************************** 
*****************  software  attribute  database  update  ***************** 

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★A****************************** 

* 

*  This  function  updates/creates  the  supporting  database  file  for  the 

*  software  attributes. 

it 

*********************************************************************** i 

void  db_update(void) 

{ 

unlink( "ru .wrd" ) ; 
uni ink ( "ru. inv" ) ; 
unlink( “ru. vdx” ) ; 
sort( “ru.dta" ) ; 
hyper ("ru.dta”, 


") 


"%i.  %-18s%-2 Ft", row, facet, attr) ; 


ru . wrd" ) ; 
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invert ( "ru . wrd" , "ru. inv" , ”ru. vdx" ) ; 

>  /*  database  update 

***********************************************************************/ 

/*********************************************************************** 
***********************  get  other  filename  *************************** 
************************************************************************ 
★ 

*  This  function  is  used  to  get  the  definition  file  for  a  user-defined 

*  facet.  If  the  file  does  not  exist,  NULL  is  returned. 

* 

*********************************************************************** ^ 
void  get_other_f ilename (char  name[LEN]) 

{ 

windowmsg; 

clw; 

_ot( "Enter  the  name  containing  the  facet  definitions  —  \n"); 
gets (name) ; 

if  ( !check_path(name, "" , Optional) ) 
name [ 0 ]  =  ' \0 ' ; 
clw; 

}  /*  get  other  filename 

***********************************************************************^ 
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/* 

*  PROGRAMMER:  JOE  E.  SWANSON 

*  SSN 

*  COMSC  5000  Thesis  and  Research 

*  Summer  1991 
*/ 

#include  "ru.h" 

^include  <conio.h> 

/*  FUNCTION  PROTOTYPES  */ 

BOOLEAN  evaluatetargets (char  tgtfilef ], COMPONENT  current); 

BOOLEAN  f ind_targets (char  ifnamef ], char  invf ilef ] , char  vdxfilef], 

char  tgtfilef ) /COMPONENT  current); 
BOOLEAN  get_tgts (char  ifname [ ] , char  invf ile [], char  vdxfilef], 
char  tgtfilef ], char  f acet f ], BOOLEAN  flag); 

INVERTNDX  binsearch ( char  inputf ilef ] ,char  key[],int  count); 

INVERTNDX  f ind_key ( char  vdxfilef ], char  keyf]); 

void  display _component (COMPONENT  target); 
void  display_targets (char  tgtfilef ), COMPONENT  user); 
void  extract (COMPONENT  *target,  int  *hits,  char  inputf]); 
void  output_f acet ( int  row,  char  *str); 

void  output_target(char  f],  char  {],  char  f],  INVERTNDX); 
void  make_query ( COMPONENT  *); 

void  tgttext(char  tgtfilef],  COMPONENT  user); 

void  query { char  if namef ] ,  char  invf ile f ], char  vdxfilef]); 

/*M  MMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM*/ 
void  query { char  ifnamef ], char  invf ilef ], char  vdxfilef]) 

{ 

char  namefFW], 

tgtf ilefFW]  =  "ru.tgt"; 

COMPONENT  current; 

els; 

makequery ( ^current ) ; 

windowO; 

clw; 

gotoxy ( 10,30) ; 

_ot ( "Searching. . . " ) ; 

if  ( f ind_targets ( ifname, invf ile, vdx file, tgtf ile , current ) ) 

{ 

evaluate_targets (tgtf ile, current) ; 
display_targets ( tgtf ile, current) ; 
tgttext (tgtf ile, current) ; 

}  /*  if  find  */ 

>  /*  query  */ 

/*mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*/ 
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/*********************************************************************** 
*************************  evaluate  targets  *************************** 
************************************************************************ 
★ 

*  This  function  reads  each  of  the  targets  from  the  tgt  file  and  insures 

*  that  a  match  exists  in  the  parameter  list  and  the  user  list.  Targets 

*  that  do  not  match  are  deleted  from  the  list.  If  all  targets  are 

*  deleted,  a  False  flag  is  returned  and  the  processing  is  halted  for 

*  this  search.  The  language  attribute  is  for  info  only.  A  component  in 

*  the  same  language  does  not  constitute  a  match. 

* 

***********************************************************************/ 
BOOLEAN  evaluate_targets ( char  tgtfile [], COMPONENT  current) 

{ 

BOOLEAN  flag  =  FALSE; 
char  input [Buf_size] , 

*pchar , 

seps[FW]  =  " , \n\r " , 
str [ FW] , 

♦duplicate, 

command [LEN]  =  "sort  /r  <  new$.tgt  >  out”; 

FILE  *fp,*fpo; 

int  att_matches  =  0; 

open_file(&fp, Read, tgtfile, "evaluate_targets" ) ; 

while( ( (pchar  =  fgets ( input , Buf_size, fp) )  !=  NULL)  &&  pchar[0]  !=  '\0' 

&&  pchar [0]  1=  ' \n' ) 

{ 

duplicate  =  strdup ( input ) ;  /*  create 

strtok( input , seps ) ;  /*  throw 

pchar  =  strtok(NULL, seps ) ;  /*  read 

if  ( str cmp( current. function, pchar)  == 
att_matches++ ; 

/*  read  & 

pchar  =  strtok(NULL, seps ) ; 
if  ( strcmp( current . object, pchar)  ==  0 
att_matches++ ; 

/*  read  & 

pchar  =  strtok(NULL, seps )  ; 
if  ( strcmp( current .medium, pchar )  ==  0) 
att_matches++ ; 

/*  read  &  compare  the  sys  type  */ 

pchar  =  strtok(NULL, seps ) ; 

if  ( strcmp( current . system_type, pchar )  ==  0) 
att_matches++ ; 

/*  read  &  compare  the  funct_area  */ 

pchar  =  strtok(NULL, seps ) ; 

if  ( strcmp{ current. funct_area, pchar)  ==  0) 
att_matches++ ; 

/* 


a  duplicate  of  the  input  */ 

away  the  component  name  * / 

&  compare  the  function  */ 

0) 

compare  the  object  */ 

> 

compare  the  medium  */ 


read  &  compare  the  setting  */ 
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pchar  =  st rtok( NULL, seps) ; 
if  (strcmp( current. setting, pchar)  ==  0) 
att_matches++ ; 

pchar  =  strtok(NULL, seps) ;  /*  discard  language  */ 

pchar  =  strtok(NULL, seps) ;  /*  read  &  compare  other  */ 

if  (pchar  !=  NULL  &&  strcmp( current. other, pchar)  ==  0) 
att_matches++ ; 

if  ( att_matches ) 

{ 

flag  =  TRUE; 

open_f ile (&fpo, Append, "new$ . tgt " , "evaluate  targets” ) ; 

itoa(att_matches, str, 10) ; 

fprintf ( fpo, "%s,%s" , str, duplicate) ; 

fclose ( fpo) ; 

} 

free (duplicate) ; 
attmatches  =  0; 

}  /*  while  */ 

fclose ( fp) ; 
system ( command ) ; 
uni ink ( "new$ .tgt" )  ; 
unlink(tgtfile) ; 
rename) "out" ,  tgtfile); 
return  flay; 

}  /*  evaluate  targets 


I *********************************************************************** 

************************  find  targets  ******************************** 
★*★★★★★★★★★***★★*★★*★*★★*★*★★★*★***★******★**********★*********★*★★★★★★★ 
★ 

*  This  file  takes  the  current  set  of  component  attributes  and  locates 

*  all  components  that  match  n  or  more  attributes.  The  target  list  is 

*  put  in  file  "ru.tgt." 

* 


***********************************************************************/ 
BOOLEAN  find_targets(char  ifname [ ] , char  invf ile [], char  vdxfile[], 

char  tgtfile[ ), COMPONENT  current) 


{ 

BOOLEAN  flag  =  FALSE; 


/*  True  indicates  target  found  */ 


flag  =  get_tgts( ifname, invf ile, vdxf ile, tgtfile, current. function, 

flag) ; 

flag  =  get_tgts ( ifname, invf ile, vdxf ile, tgtfile, current . object , flag ) ; 


flag  =  get_tgts( ifname, invf ile, vdxf ile, tgtfile, current. medium, flag) ; 
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flag  =  get_tgts ( if name, invf ile, vdxf ile, tgtf ile, current . system_type, 

flag) ; 

flag  =  get_tgts ( if name, invf ile, vdxf ile, tgtf ile,  current . funct_area, 

flag) ; 

flag  =  get_tgts ( if name, invf ile, vdxf ile, tgtf ile, current . setting, 

flag) ; 

flag  =  get_tgts ( if name, invf ile, vdxf ile, tgtf ile, current . other, f lag) ; 

if  (flag) 

{ 

sort (tgtf ile) ; 
un ique ( tgt  f i le ) ; 

> 

else 

{ 

clw; 

_ot("No  targets  found. \n\nPress  any  key  to  continue..."); 
getch ( ) ; 

} 

return  flag; 

}  /*  find  targets 


★********************************************************************** 


/ 


/*********************************************************************** 
*************************  binary  search  ****************************** 

★a********************************************************************** 

* 

*  This  function  performs  a  binary  search  of  data  stored  on  secondary 

*  storage.  It  returns  the  index  or  NULL  if  not  found. 

* 

***********************************************************************/ 
INVERTNDX  bin_search ( char  inputf ile [], char  key[],int  count) 

{ 

FILE  *fp; 

int  low  =  0,  high  =  count-1, 
test ; 

INVERTNDX  index; 
long  guess,  look; 

open_f ile ( &fp, "rb" , inputf ile, "bin_search" ) ; 
while(low  <=  high) 

{ 

guess  =  (long)  (low  +  high)/2;  /*  find  mid_point  */ 

look  =  guess  *  sizeof ( INVERTNDX) ; 
f seek ( fp, look, SEEK_SET) ; 
f read ( & index, 1 , sizeof ( INVERTNDX ) , fp) ; 


if  ((test  =  strcmp( key , index . key ) )  <  0) 
high  =  (int)  guess  -  1; 
else 

if  (test  >  0) 
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low  =  (int)  guess  +1; 
else 
{ 

f close( fp) ; 
return  index; 

} 

}  /*  while  low  */ 

f close ( fp) ; 

strcpy ( index . key,  " " )  ; 

return  index;  /*  key  not  found  */ 

>  /*  bin  search 

***********************************************************************/ 

/*********************************************************************** 
****************************  f ind_key  ******************************** 


*  This  function  finds  the  specified  key,  if  it  exists,  on  secondary 

*  storage. 

* 

★★a********************************************************************/ 
INVERTNDX  f indkey ( char  vdxf ile[ ] ,char  key[]) 

FILE  *fp; 

int  count;  /*  number  of  elements  in  vdxfile  */ 

INVERTNDX  index; 

long  pos;  /*  number  of  bytes  in  file  */ 

/*  find  number  of  index  entries  */ 
open_f ile(&fp, "rb" , vdxf ile, "find  key" ) ; 
f seek ( f p, OL, SEEK_END ) ; 

pos  =  ftell(fp);  /*  get  file  length  */ 

fclose( fp) ; 

count  =  (int)  pos  /  sizeof ( INVERTNDX ) ; 
index  =  bin_search(vdxf ile, key, count ) ; 
return  index; 

}  /*  find  key  */ 


^*******************************<r************************************iHt^ 
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/★A********************************************************************* 

*************************  display  targets  **************************** 
************************************************************************ 
★ 

*  This  function  displays  on  the  screen  all  the  targets  found  during  the 

*  search. 

* 

***********************************************************************/ 
void  display_targets(char  tgtfile [], COMPONENT  user) 

{ 

char  input [ Buf_size] , 
ch; 

COMPONENT  target; 

FILE  *fp; 
int  num, 

hits,  /*  number  of  parameter  matches  */ 

wronganswer  =  TRUE; 
float  request  =  0; 

/*  create  screen  display  */ 

els; 

window4 ; 
gotoxy (1,4); 

_ ot ( " FACETS " ) ; 

gotoxy (3,4); 

_ot ( "Component :  "  ) ; 

gotoxy (4, 1)  ; 

_ot("l.  Function:"); 

gotoxy (6, 1)  ; 

_ot("2.  Object:"); 

gotoxy (7,1); 

_ot("3.  Medium:"); 

gotoxy (9,1)  ; 

_ot("4.  System  type:"); 

gotoxy (10,1)  ; 

_ot("5.  Funct.  area:"); 

gotoxy ( 12, 1 )  ; 

_ot("6.  Setting:"); 

gotoxy ( 13,1); 

_ot("7.  Language:"); 

gotoxy (15,1); 

_ot ( "8  .  Other: " ) ; 


window5 ; 


/*  display  user  request  */ 
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gotoxy (1,1); 

_ot ("USER’S  REQUEST”); 

gotoxy (4, 1) ; 

sprintf (otext, *s” , 18, user. function) ; 

_ot ( otext ) ; 

gotoxy (6,1); 

sprintf (otext, ”%-. *s” , 18 , user .object ) ; 

_ot ( otext ) ; 

gotoxy (7,1); 

sprintf (otext, ”%-. *s”, 18, user .medium) ; 

_ot (otext ) ; 

gotoxy (9,1); 

sprintf (otext, ”%-. *s” , 18 , user. system_type) ; 

_ot ( otext ) ; 

gotoxy (10,1) ; 

sprintf (otext, "%-. *s” , 18, user . funct_area) ; 

_ot ( otext ) ; 

gotoxy (12,1); 

sprintf (otext, ”%-. *s” , 18, user . setting) ; 

_ot ( otext ) ; 

gotoxy (15, 1) ; 

sprintf (otext, ”%-. *s” , 18, user .other ) ; 

_ot (otext ) ; 

/*  get  number  of  user  attributes  input  */ 
if  (user. functionfO]  1=  '\0')  request++; 
if  (user.object[0]  !=  '\0')  request++; 
if  (user.medium[0)  !=  '\0')  request++; 
if  (user.system_type[0)  1=  '\0')  request++; 
if  (user. funct_area(0)  1=  '\0')  request++; 
if  (user.settingfO)  1=  ' \ 0 ’ )  request++; 
if  ( user. other (0)  !=  '\0')  request++; 

/*  display  targets  */ 

open_f ile(&fp,Read,tgtfile, "display  targets" ) ; 
while ( fgets ( input , Buf_size, fp)  !=  NULL) 

{ 

extract ( Starget, Shits , input ) ; 

if  (hits  /  request  ==  1)  display_component (target ) ; 
else 
{ 

windowmsg; 

clw; 

sprintf (otext, "Component  %s  meets  %5.2f  %%  of  the  request. \n", 
target. comp_name, hits  /  request  *  100); 

_ot (otext ) ; 

_ot( "Display  —  (Y/N)  " ) ; 


if  (respond()) 

{ 

clw; 

display_component( target) ; 

> 

else  continue; 


while  (wronganswer ) 

{ 

windowl ; 
clw; 

if  (hits  >  1) 

{ 

sprintf (otext, "%2i  attributes  matched. \n" , hits) ; 

_ot (otext ) ; 

} 

else 

{ 

sprintf (otext, "%2i  attribute  matched. \n” , hits) ; 

_ot ( otext ) ; 

} 

_ot( "Press  (C)ontinue,  Facet  (D)ef initions,  or  (Q)uit...  " ) 
ch  =  (char)  tolower ( getch ( ) ) ; 

switch (ch) 

{ 

case  ' c ’ : 

wronganswer  =  FALSE; 
break; 

case  'd' s 
windowthes; 

_ot( "Enter  the  number  of\nthe  facet  or\nO  to  return\n”) 
while((num  =  getche()  -  48)  1=  0) 

{ 

if  (num  !=  8) 
attr_def ( num) ; 
windowthes ; 
gotoxy (4,1); 

)  /*  while  */ 

clw; 

break; 

case  ' q ’ : 

wronganswer  =  FALSE; 
break; 

default:  break; 


)  /*  switch  */ 
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>  /*  while  wronganswer  */ 

wronganswer  =  TRUE; 
window6; 

if  (ch  ==  ' q‘ ) 
break; 

}  /*  while  fgets  */ 
f close ( fp) ; 

>  /*  display  targets 

***********************************************************************/ 

/*********************************************************************** 
******************************  ext  ract  ******************************* 


* 

*  This  function  is  used  to  break  down  the  tokens  of  the  input  string  and 

*  put  them  in  their  respective  structure  members. 

* 

***********************************************************************/ 
void  extract (COMPONENT  ‘current,  int  ♦hits,  char  input [] ) 

{ 

char  str[FW], 

seps[FW]  =  ",\n\r”; 

strcpy( str, strtok( input, seps) ) ;  /*  read  the  hits  */ 

*hits  =  atoi(str); 

strcpy (current->comp_name, strtok{ NULL, seps) ) ; 

/*  read  the  function  */ 
strcpy ( current->f unction, strtok( NULL, seps) ) ; 

/*  read  the  object  */ 

strcpy ( current->object , strtok(NULL, seps) ) ; 

/*  read  the  medium  */ 

strcpy (current->medium, strtok(NULL, seps ) ) ; 

/*  read  the  sys  type  */ 

strcpy ( current->system_type , strtok ( NULL, seps ) ) ; 

/*  read  the  funct_area  */ 
strcpy (current->funct_area, strtok(NULL, seps) ) ; 

/*  read  the  setting  */ 
strcpy (current->setting, strtok (NULL, seps) ) ; 

strcpy (current->language, strtok( NULL, seps) ) ; 

strcpy ( current->other , strtok (NULL, seps) ) ; 

>  /*  extract 
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/*********************************************************************** 
**************************  make  query  ******************************** 

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★A* 

★ 

*  This  function  allows  the  user  to  complete  the  query  questionnaire. 

* 

***********************************************************************/ 
void  make_query (COMPONENT  ‘current) 

{ 

char  buffer (LEN)  =  ""; 

windowl ; 
clw; 

_ot("At  each  of  the  following  prompts,  enter  the  attribute  that  \ 
best\n" ) ; 

_ot ( "describes  the  desired  module  or  press  ENTER  to  choose  from  a  \ 
list. ")  ; 

window3 ; 
gotoxy (21,1) ; 
ot ( "Making  Query" ) ; 

f flush  ( stdin ) ; 

get_attr ( 1 , current->f unction, "Function: " , " funct . ths" ) ; 

get_attr(2,current->object, "Object: ", "object. ths" ) ; 

get_attr(3,current->medium, "Medium: ", "medium. ths" ) ; 

getattr ( 4, current->system_type, "System  Type: " , "systype. ths” ) ; 

getattr ( 5, current->funct_area, "Functional  Area: ", "funcarea.ths" ) ; 

getattr ( 6, current->setting, "Setting: " , "setting. ths" ) ; 

get  attr ( 8, current->other , "Other: " , buffer)  ; 

while  (chg_attribute( current, ' q' ) ) ; 

clw; 

>  /*  make  query 

***********************************************************************  j 
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/*********************************************************************** 
**************************  output  target  ***************************** 
************************************************************************ 

* 

*  This  function  insures  that  a  target  is  found.  It  then  retrieves  the 

*  target  info  and  outputs  it  to  the  tgt  file. 

* 

***********************************************************************/ 
void  output_target (char  ifname[ ] , char  tgtf ile[ ] , char  invfilefj, 

INVERTNDX  index) 

{ 

char  list [ Buf_size ] , 

target ( Buf^size ] , 
file(FW) , 

*pchar , 
scr ( FW ] ; 

FILE  *  f p ; 
int  num,  i; 

/*  get  the  inverted  list  entry  */ 
openf ile ( &fp, "rb" , invf ile, "output^target” ) ; 
fseek( fp, index. of f set, SEEKSET) ; 
fgets ( list , Bufsize, fp) ; 
fclose( fp) ; 

strtok( list, "  ");  /*  remove  the  words  from  the  list  */ 

while  (TRUE) 

{ 

pchar  =  strtok(NULL, "  :"); 
if  (pchar  ==  NULL) 
break; 

/*  strcpy( file, pchar) ;  save  for  future  refinement  */ 
strcpy  ( scr ,  strtok(NULL,  ” 

/*  retrieve  attributes  from  data  file  */ 

num  =  atoi(scr); 

open_f ile(&fp, "r" , ifname, "output_target" ) ; 

for  (i  =  1;  i  <=  num;  i++) 
fgets(target,Buf_size, fp) ; 

fp  =  freopen(tgtf ile, Append, fp) ; 
f puts (target, fp) ; 
fclose( fp) ; 

}  /*  while  */ 

}  /*  output  target  */ 


/**********************************************************************  j 
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^**********************************************************************» 
**************************  target  text  **★*★★****★★★****★*★*****★★★*** 

★★★★★★★★★★★★★★★★★★★★★A************************************************** 

* 

*  This  function  asks  the  user  whether  or  not  the  tgt  information  is  to 

*  be  retained.  If  so,  the  user  is  asked  for  a  file  name  and  the  info  is 

*  put  in  the  specified  file,  otherwise  it  is  deleted. 

* 

***********************************************************************/ 
void  tgttext(char  tgtfilef],  COMPONENT  user) 

{ 

char  namefLEN], 

data[Buf_size] ; 

COMPONENT  curr; 

FILE  *fp,  *fpo; 
int  hits; 

els; 

windowl ; 
gotoxy (2,1); 

_ot("Do  you  wish  to  keep  the  target  file?  [Y/N]  ”); 
gotoxy (2, 45) ; 

if  (!respond())  unlink(tgtf ile) ; 
else 
{ 

clw; 

puts ( "\nEnter  new  target  file  name.”); 

gets (name) ; 

clw; 

while ( check_path( name, Optional) ) 

{ 

sprintf (otext, "The  file,  %s,  already  exist.  Overwrite?  [Y/N]  \ 

" , name ) ; 

_ot ( otext ) ; 
if  ( ! respond ( ) ) 

{ 

clw; 

puts( "\nEnter  new  target  file  name.”); 

gets (name) ; 

clw; 

} 

else 

{ 

clw; 

break; 

} 

} 

open_f ile(&fp, Read, tgtf ile, "tgtoutput") ; 
ope n_f ile ( &f po, Write, name, "tgtoutput" ) ; 
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_ot( "Enter  up  to  two  lines  of  comments . \n" ) ; 
gets (data) ; 

if  (data[0]  1=  '\0')  fprintf ( fpo, "\n%-80s\n" , data ) ; 
gets (data) ; 

if  (data[0]  1=  ’\0')  fprintf ( fpo, "%-80s\n" , data) ; 

fprintf ( fpo, "\nThe  attributes  requested  are:\n\n" ); 

fprintf ( fpo, "\t%-20s  —  %-40s\n", "Function", user. function) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n", "Object" , user. object)  ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "Medium" , user .medium) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "System  Type" , user . system_type) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "Functional  Area" , user . funct_area) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "Setting" , user . setting) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n\n" , "Other" , user. other) ; 

fprintf ( fpo, "%s\n\n ","****************************************"); 

while ( fgets (data, Buf_size, fp)  1=  NULL) 

{ 

extract ( &curr , &hits , data ) ; 

fprintf ( fpo, ”\nThe  attributes  of  %s  are : \ n\ n " , curr . comp_name ) ; 

fprintf ( fpo, " \t%-20s  —  %-40s\n" , "Function" , curr . function) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "Object" , curr .object ) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n” , "Medium" , curr .medium) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "System  Type" , curr . systemtype) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "Functional  Area", 

curr. funct_area) ; 

fprintf ( fpo, "\t%-20s  —  %-40s\n" , "Setting" , curr . setting) ; 
fprintf ( fpo, " \t%-20s  —  %-40s\n" , "Language" , curr . language) ; 
fprintf ( fpo, "\t%-20s  —  %-40s\n\n” , "Other” , curr .other ) ; 
if  (hits  ==  1) 

fprintf ( fpo, "%s  matched  %i  attribute. \n" , curr . compname, hits ) ; 
else 

fprintf ( fpo, "%s  matched  %i  attributes . \n" , curr . comp_name, hits ) ; 

fprintf ( fpo, "%s\n\n", "*»**************************************"); 

}  /*  while  */ 

}  /*  else  */ 

fcloseall ( ) ; 
unlink(tgtf ile) ; 

)  /*  target  text 


***********************************************************************  j 
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/*********************************************************************** 
*************************  get  targets  ******************************** 

★ 

*  This  function  locates  all  occurrences  of  the  given  facet  within  the 

*  software  attribute  database. 

* 

***********************************************************************y 
BOOLEAN  get_tgts (char  if name( ] , char  invfile[ ] ,char  vdxfile[], 

char  tgtf ile( ] , char  f acet [], BOOLEAN  flag) 

{ 

INVERTNDX  target; 

/*  find  the  targets  */ 
target  =  find_key( vdxf ile, facet) ; 
if  (target.key[0]  !=  ' \0 ' ) 

{ 

output_target ( if name, tgtf ile, invf ile, target ) ; 
flag  =  TRUE; 

> 

return  flag; 

}  /*  get  targets 

a**********************************************************************/ 

*************************  display  component  ************************** 

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★A*********************** 

* 

*  This  function  displays  the  given  component  on  the  screen  alongside  the 

*  user's  request. 

* 

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★ft******************************* ^ 

void  display_component (COMPONENT  target) 

{ 

window6 ; 
clw; 

gotoxy (1,1); 

_Ot ("CANDIDATE" ); 

output_f acet ( 3 , target . comp_name ) ; 
output_f acet ( 4, target . function) ; 
output_f acet (6, target. object) ; 
output_f acet (7, target. medium) ; 
output_f acet ( 9 , target . system_type ) ; 
output_facet( 10, target. funct_area) ; 
output_facet( 12, target. setting) ; 
output_facet ( 13, target. language) ; 
output_facet ( 15, target. other) ; 


}  /*  display  component 


output  facet 


* 

*  This  function  prints  the  attribute. 

* 


void  output_f acet ( int  row,  char  *str) 

{ 

gotoxy(row, 1) ; 

sprintf (otext, "%s" , str) ; 

_ot (otext ) ; 


}  /*  output  facet 
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/* 

*  PROGRAMMER;  JOE  E.  SWANSON 

*  ■■■■■■ 

*  COMSC  5000  Thesis  and  Research 

*  Summer  1991 

*t 

#include  "ru.h” 

#include  <conio.h> 

#define  Maxbuf  15 

typedef  struct  tbuf  { 
char  data[FW]; 

}  T BUFFER; 

/*  FUNCTION  PROTOTYPES  */ 
char  *remove_trailing_blanks ( char  *str) ; 
char  *display_choices(char  linenof ] , char  file[]); 
char  *print_keys (TBUFFER  *buffer,  int  count); 

int  print_choices(char  buf fer[ j [FW] ,  int  num) ; 

INVERTNDX  f ind_key ( char  vdxf ile[ ], char  key[]); 

void  check_thesaurus(char  dtaf ile[ ] , char  wrdf ile[ ] , char  invfile[], 

char  vdxf ile [ ] )  ; 

void  createf ilenames(char  *dtaf ile, char  *wrdf ile, char  ‘invfile, 

char  *vdxfile); 

void  compare_key( INVERTNDX  *key,char  in\’file(]); 
void  displaykeys ( INVERTNDX  *key,char  dtafile[]); 
void  get_keys(FILE  *fp, TBUFFER  ‘buffer); 

void  invert(char  inputf ile [], char  invf ile [], char  vdxfilef]); 
void  thesaurus (char  code, char  key[j,char  dtafile[]); 

/*********************************************************************** 
****************************  Thes  auru  s  ******************************* 
************************************************************************ 

* 

*  This  function  is  the  driver  for  the  common  vocabulary  of  the  reuse 

*  system. 

* 

***********************************************************************/ 
void  thesaurus (char  code, char  key[],char  dtafile[]) 

{ 

char  wrdfile[LEN] , invfile[LEN] , vdxf ile[LEN] ; 

INVERTNDX  ikey; 

create_f ilenames (dtaf ile, wrdf ile, invf ile, vdxf ile ) ; 

check_thesaurus (dtaf ile, wrdf ile, invf ile, vdxf ile) ; 

/*  search  for  key  in  databank  */ 

ikey  =  find_key (vdxf ile, key) ; 
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if  (ikey.keyfO]  ==  '\0') 

display_keys(&ikey, dtaf ile) ; 
else 

compare_key (&ikey, invf ile) ; 
strcpy (key, ikey. key) ; 

)  /*  thesaurus 


***********************************************************************^ 

/*********************************************************************** 
*************************  check  thesaurus  **************************** 
************************************************************************ 
* 

*  This  function  insures  that  the  support  files  for  the  thesaurus  (common 

*  vocabulary)  exist.  If  the  thesaurus  data  file  does  not  exist,  the 

*  program  will  terminate.  If  one  of  the  other  supporting  files  does  not 

*  exist,  all  other  files  will  be  created  and  updated. 

* 


***********************************************************************^ 
void  check_thesaurus(char  dtaf ile[ ] , char  wrdf ile [], char  invfile[], 

char  vdxf ile [ ] ) 

{ 

BOOLEAN  flag  =  TRUE; 


checkpath (dtaf ile, 1) ;  /*  if  dfile  lexist,  prog  will  terminate  */ 

if  (check_path( wrdf ile, "",2) ) 
if  (check_path(invfile, "",2) ) 
if  (check_path( vdxf ile, "",2) ) ; 
else  flag  =  FALSE; 
else  flag  =  FALSE; 
else  flag  =  FALSE; 


if  ( ! f 1 ag ) 

{ 

sort (dtaf ile) ; 

hyper (dtaf ile, wrdf ile) ; 

invert (wrdf ile, invf ile, vdxf ile) ; 


}  /*  check  thesaurus 
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/*********************************************************************** 
******************************  compare  key  *************************** 
************************************************************************ 
* 

*  This  function  compares  the  user’s  input  with  the  primekeys  of  the 

*  thesaurus/common  vocabulary.  If  the  user’s  input  !=  primekey,  the 

*  primekey  is  substituted  in  place  of  the  user's  input. 

* 

***********************************************************************^ 
void  compare_key ( INVERTNDX  *key,char  invfile[]) 

{ 

char  buf f er [ Buf_size ] , 
file [ 13  ] , 
lineno[LEN]  = 
primekey [LEN] , 

*ptr; 

FILE  *fp; 

int  count  =0,  i; 

open_f  ile(  &f  p,  Read”b”  ,  invf  ile,  "compare  key  ’’ )  ; 
f seek( fp, key->of f set , SEEK_SET) ; 
fgets (buf fer , Buf_size, fp) ; 
fclose( fp) ; 

/*  get  line  #(s)  of  key  occurrences  in  dta  if  multiple  occurrence,  */ 
/*  give  choices  to  user  */ 

ptr  =  strstr (buf fer , " : " )  +  1;  /*  discard  the  key  */ 

strcpy (buffer ,ptr) ; 
while ( buf fer ( 0 ]  !=  '\0') 

{ 

ptr  =  strstr (buf fer, ":" )  +  1; 

strcpy ( file, strtok(buf fer :  \n\r"));  /*  get  file  name  */ 

strcpy (buffer, ptr ) ; 

ptr  =  strstr (buffer, ":" )  +  1; 

strcat ( lineno, strtok(buf fer, ” :  \n\r"));  /*  append  line#  */ 
strcat ( lineno, " , " ) ;  /*  append  delimiter  */ 

strcpy(buffer,ptr ) ; 

}  /*  while  */ 

for  (i  =0;  i  <  (int)  strlen( lineno) ;  i++) 
if  (lineno[i]  ==  ',')  count++; 

if  (count  >  1)  strcpy (key->key,display_choices( lineno, file) ) ; 
else 
{ 

open_f ile(&fp,Read, file, "compare  key” ) ; 
count  =  atoi( strtok( lineno, "  ,\n\r")); 

for  (i  =  1;  i  <=  count;  i++)  fgets(buf fer, Buf_size, fp) ; 
strcpy ( key->key , strtok(buf fer , " , \n\r" ) ) ; 
if  (key->key[0]  ==•*•)  /*  wildcard  =  NULL  */ 

key->key[0]  =  '\0'; 


f close ( f p) ; 


} 

}  /*  compare  key 

***********************************************************************/ 

/*********************************************************************** 
*************************  display  choices  **************************** 
★★★*******★***★**★★**★★★★★★*★★**★★★★★★★*★★★★★**★******★★★******★******** 
★ 

*  When  a  given  descriptor  is  a  valid  entry  for  more  than  one  set  of 

*  descriptors  in  the  same  thesaurus  file,  this  function  displays  the 

*  key  words  of  the  common  vocabulary  when  >  1  choices  exist  for  the 

*  user's  input.  The  choices  are  displayed  and  the  user  selects  the 

*  closest  synonym.  The  user's  choice  is  returned  to  the  calling 

*  function. 

* 

*  EXAMPLE:  list, enumerate, count 

*  output, list, write 

*  list  has  two  possible  meanings  so  list  and  output  would  be  presented 

*  to  the  user  for  his/her  selection. 

* 

***********************************************************************y 
char  *display_choices(char  lineno[ ] , char  file[]) 

{ 

char  buf fer(Maxbuf ] [FW] , 
temp [ Buf _size] , 

*ptr; 

FILE  *fp; 

int  line,  num  =0,  i; 

openf ile(&fp,Read, file, "display  choices” ) ; 
while(lineno[0]  J=  '\0')  /*  extract  choices  */ 

{ 

ptr  =  strstr ( lineno, " , " )  +  1; 
strcpy (temp, strtok( lineno, " ,  \n\r” ) ) ; 
strcpy( lineno, ptr) ; 
line  =  atoi(temp); 
rewind ( fp) ; 

for  (i  =  1;  i  <=  line;  i++)  fgets(temp, Buf_size, fp) ; 

sprintf (buf fer [num] ,"%-3c%-16s” , ++num  +  64, strtok( temp, " , \n\r" ) ) ; 

> 

f close ( f p) ; 

/*  print  the  choices  */ 
do 

line  =  print_choices(buffer,num) ; 
while(line  ==  'n'  ||  line  ==  'N'  ||  line  ==  'p'  ||  line  ==  'P'); 

strtok(buf fer ( line] , "  ");  /*  discard  number  */ 

ptr  =  strtok(NULL, "  \n\r"); 

if  (ptr[0]  ==•*•)  /*  wildcard  ==  NULL  */ 

ptr[0]  =  ' \0 ' ; 
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return  ptr; 

>  /*  display  choices 

***********************************************************************/ 

^*********************************************************************** 
**************************  print  choices  ***************************** 
************************************************************************ 
* 

*  This  function  prints  the  primekeys  that  the  user  has  to  choose  from. 

*  The  user  selects  and  the  choice  is  returned. 

* 

***********************************************************************y 
int  print_choices(char  buf fer [ ] [ FW] ,  int  num) 

{ 

int  i ,  j ; 

struct  rccoord  oldpos; 
windowthes; 

for  (i  =  1,  j  =  1;  i  <=  num;  i++) 

{ 

gotoxy ( i,  j ) ; 

sprintf ( otext , "%-19s" , buf fer [ i ] ) ; 

_ot ( otext ) ; 

> 

gotoxy (20, 1) ; 
j  =  getche(); 

if  (j  !=  'n'  &&  j  !=  'N'  &&  j  i=  'p'  &&  j  1=  'P') 

{ 

j  =  toupper ( j ) ; 
j  -=  64; 

while (j  <1  ||  j  >  num) 

{ 

gotoxy (20, 1) ; 
f f lush( stdin) ; 
j  =  getche(); 

if  (j  ==  'n'  ||  j  ==  'N'  ||  j  ==  'p'  ||  j  ==  ’P’)  break; 

else 

{ 

j  =  toupper ( j ) ; 
j  ~=  64; 

> 

>  /*  while  */ 

>  /*  if  j  !  */ 
clw; 

windowthes; 

clw; 
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return  j ; 

}  /*  print  choices 


* 

*  This  function  displays  the  primekeys  from  the  common  vocabulary  when 

*  the  user  has  made  an  erroneous  entry.  The  keys  are  displayed  on  the 

*  right  side  of  the  screen  in  groups  of  14.  By  pressing  n  or  p  the  user 

*  can  traverse  the  next  or  the  previous  list  entries. 

* 

***********************************************************************y 
void  display_keys ( INVERTNDX  *key,char  dtafilef]) 

{ 

char  line[Buf_size] ; 

FILE  *  fp; 

long  linect  =  0,  /*  line  count  for  data  file  */ 

index; 

TBUFFER  * buffer; 
window2 ; 

_ot( "Choose  from  the  given  list.\n”); 

_ot("Press  N  for  the  next  list  or  P  for  the  previous  list.  "); 

open_file(&fp,Read,dtafile, "display  keys" ) ; 

while  ( fgets ( line, Buf_size, fp)  i  =  NULL) 

linect++;  /*  count  thesaurus  entries  */ 

rewind ( fp) ; 

buffer  =  (TBUFFER  *)  calloc((int)  linect  +  1 , sizeof (TBUFFER) ) ; 
get_keys( fp, buffer) ; 

strcpy(key->key,print_keys( buffer, ( int)  linect) ) ; 

if  (key->key[0]  ==  '*')  /*  wildcard  ==  NULL  */ 

key->key[0]  =  '\0'; 

fclose ( fp) ; 
window2 ; 
clw; 

)  /*  display  keys 

***********************************************************************  j 
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y*********************************************************************** 

****************************  get  keys  ******************************** 

★a********************************************************************** 

★ 

*  This  function  reads  the  prime  keys  from  the  vocabulary  data  file  and 

*  loads  them  into  the  buffer. 

* 

***********************************************************************^ 
void  get_key s (FILE  *fp, TBUFFER  ^buffer) 

{ 

char  line[Buf_size] ; 
int  i  =  1; 

while(  fgets ( line,  Buf__size,  fp)  !=  NULL) 

strcpy (buffer [ i++ ] . data, strtok( line,  " ,  \r\n" ) ) ; 

}  /*  get  keys 

**************************************************************w********y 

***************************  pri nt _key  s  ******************************* 
★ 

*  This  function  takes  the  primekeys  of  the  common  vocabulary  and 

*  displays  them.  The  user  can  traverse  the  list  and  make  a  selection. 

* 

***********************************************************************/ 
char  *print_keys (TBUFFER  *buffer,  int  count) 

{ 

char  sbuf f er [Maxbuf ] [ FW] , 

♦dummy; 

int  i,  j,  k,  m,  max  =  Maxbuf  -  3; 

if  (max  <  count)  j  =  max;  else  j  =  count; 
for  (i  =  1;  i  <=  j ;  i++) 

sprintf ( sbuf fer ( i ] , "%-3c%-16s"  ,  i  +  64,buf fer ( i] .data) ; 

k  =  print_choices( sbuf fer,  i  -  1); 
while  (TRUE) 

{ 

switch(k) 

{ 

case  ’N’: 
case  ' n ' : 

if  (i  +  max  >  count) 

{ 

j  =  count; 
i  =  count  -  max; 
if  (i  <  1)  i  =  1; 

} 

else  j  = 


i  +  max 


break 


case  ' P ' : 
case  ' p ' : 

if  (i  -  2  *  max  <=  1) 

{ 

i  =  1; 

if  (count  <  max)  j  =  count; 
else  j  =  max; 

> 

else 

{ 

j  =  i  -  max; 
i  -=  2  *  max; 

> 

break; 
default : 

dummy  =  sbufferfk]  +3; 

return  remove_trailing_blanks (dummy ) ; 

break; 

>  /*  switch  */ 

for  (m  =  1;  i  <=  j ;  m++f  i++) 

sprintf (sbuf fer [m] , "%-3c%-16s" ,m  +  64,buffer[i] .data) ; 

k  =  pr int_choices( sbuf fer ,m  -  1); 

>  /*  while  */ 

}  /*  print  keys 

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★**************************************^ 

/★★★a******************************************************************* 
***********************  create  filenames  ***************************** 


* 

*  This  function  creates  the  filenames  for  the  thesaurus  supporting 

*  files. 

* 

*  wrdfile  is  the  file  containing  the  locations  for  each  word  in 

*  the  thesaurus. 

* 

*  invfile  is  the  inverted  list. 

* 

*  vdxfile  is  the  index  for  the  inverted  list. 

* 


***********************************************************************^ 
void  create_f ilenames(char  *dtaf ile,char  *wrdf ile,char  *invfile, 

char  *vdxfile) 


{ 


char  drive(3),  dir(LEN),  fname[9),  ext[5]; 
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splitpath {dtaf ile,drive,dir, fname, ext) ; 
strcpy(wrdf ile, fname) ; 
strcpy { invf ile, fname) ; 
strcpy (vdxf ile, fname) ; 
strcat(wrdfile, " .wrd” ) ; 
strcat { invf ile, ” . inv” ) ; 
strcat(vdxfile, ” . vdx" ) ; 

}  /*  create  filenames 
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/* 

*  PROGRAMMER^JOE  E. 

*  HHHHB 

*  COMSC  5000  Thesis 

*  Summer  1991 


SWANSON 
and  Research 


*/ 


^include  "ru.h" 


void  draw_hline( int  row,  int  col,  int  length); 
void  draw_vline{int  row,  int  col,  int  length); 
void  screens (int  screen); 

******************************  screens  *************************** 
******************************************************************** 
* 

*  This  function  is  used  to  subdivide  the  screen  into  different  text 

*  windows.  All  characters  used  are  in  the  extended  ASCII  character 

* 

******************************************************************** 
void  screens (int  screen) 

{ 

int  i; 


switch  (screen) 

{ 

case  Is 
windowO; 

draw_hline( 5, 1, 80) ; 
break; 


case  2  s 
break; 


case  3: 
break; 


case  4: 
break; 

case  5: 
break; 


case  6: 
break; 

case  7s  /*  thesaurus  window  * / 

windowO; 

draw_vline(6, 60, 16) ; 
break; 
case  8s 


it  it  it  it 
it  it  it  it 
it  it  it  it 

set. 

it -kit  J 


/*  msg  window  */ 
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windowO ; 

draw_hline(22, 1,80) ; 
break; 

case  9:  /*  openning  menu  box  */ 

windowO ; 
els; 

sprintf (otext , "2% . *s?" , 59 ,Hline) ; 
gotoxy{5, 10) ; 

_ot {otext ) ; 
draw_vline(6, 10, 14) ; 
draw_vline( 6, 70, 14) ; 
gotoxy ( 20, 10) ; 

sprintf (otext, "@%. *sY", 59,Hline) ; 

_ot (otext ) ; 
break; 

default : 
break; 

>  /*  switch  */ 

>  / *  screens 

**********************************-******************************-***-****y 

y*********************************************************************** 
************************  draw  horizontal  line  ************************ 


* 

*  This  function  draws  a  horizontal  line  based  on  the  given  parameters. 

* 

***********************************************************************  j 

void  draw_hline( int  row,  int  col,  int  length) 

{ 

sprintf (otext, "% . *s” , length, HI ine) ; 
gotoxy ( row , col ) ; 

_ot( otext) ; 

>  /*  draw  horizontal  line 

***********************************************************************^ 
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/* 

*  PROGRAMMER^JOE  E.  SWANSON 

* 

*  COMSC  5000  Thesis  and  Research 

*  revised  Summer  1991 

* 

*  This  program  creates  the  index  entries  for  a  hypertext  system.  It  was 

*  developed  on  a  12  Mhz  80286  IBM  AT  compatible  using  Microsoft 

*  Quick  C  2.0.  The  program  is  designed  to  make  use  of  a  hard  disk. 

*  As  the  DOS  sort  utility  is  limited  to  <  64K,  the  data  is  read  in 

*  blocks  of  16K;  this  was  the  block  size  that  produced  the  quickest  run 

*  time  on  the  development  system.  The  blocks  are  sorted  and  then  merged 

*  in  the  sort()  function. 

* 

*  The  hyper()  is  a  road  map  for  the  control  of  this  program.  Each 

*  function  is  passed  the  name  of  the  file  that  is  to  be  manipulated. 

*  All  i/o  calls  are  made  from  within  the  respective  functions. 

*/ 

#include  "ru.h" 

#include  <malloc.h> 

#include  <ctype.h> 

#define  Max_line  500 

#define  Scr_size  1 

#define  Word_length  500 


/*  FUNCTION  PROTOTYPES  */ 
void  get_words ( char  input [ ] , char  output [ ] ) ; 
void  hyper (char  f ile [], char  outfile[]); 
void  unique (char  f ile_name[ ] ) ; 

/  *M  MMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM*/ 

void  hyper (char  file[],char  outfilef]) 

{ 

/*  begin  file  processing  */ 

get_words( file, outf ile) ; 
sort (outf ile) ; 

unique(outfile) ;  /*  remove  duplicate  entries  */ 

>  /*  hyper  */ 


/*m  mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm*/ 
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/*********************************************************************** 
******************************  get  words  ***************************** 

★★★★★★IT***************************************************************** 

* 

*  This  function  takes  an  input  file  and  breaks  it  into  tokens.  It  then 

*  outputs  the  tokens  along  with  the  file  from  which  it  came  and  the 

*  appropriate  screen  number. 

* 

*********************************************************************** y 
void  get_words(char  inputf],  char  output[]) 

{ 

int  i;  /*  loop  control  variable  */ 

int  line_number  =  0,  /*  line  number  of  input  file  */ 

scrnum  =0;  /*  screen  number  */ 

char  word[Word_length] ,  /*  input  word  */ 

inputl ine [ Maxi ine ] , 

♦tempwordl , 

seps(]  =  ,,,\n\r";  /*  separators  for  strtok()  */ 

FILE  *Finput,  * Foutput; 

openf ile(&Finput/ "r", input, "get_words” ) ; 
openf ile(&Foutput, "w+" , output, "get_words" ) ; 

/*  get  tokens  and  arrange  output  */ 
while  (fgets(input_line,Max_line-1 ,Finput)  1=  NULL) 

{  /*  increment  scrnum  if  necessary  */ 

if  ( ! ( line_number++  %  Scrsize) )  ++scr_num; 

tempwordl  =  strtok( inputline, seps) ; 

while  (tempwordl  !=  NULL  &&  temp_wordl [ 0 ]  !=  ’  ’) 

{ 

/*  insure  all  characters  are  lower  case  */ 
for  (i  =  0;  i  <  (int)  strlen(temp_wordl) ;  i++) 
temp_word 1 [ i ]  =  (char)  tolower(temp_wordl[i]); 

fprintf ( Foutput, "%s  :  ",  temp_wordl); 
fprintf (Foutput, "%s  :  ",  input); 
fprintf ( Fo:  {  put , "%d\n" ,  scr_num) ; 

tempwordl  =  strtok(NULL, seps) ;  /*  get  next  token  */ 

}  /*  while  temp  word  */ 

}  /*  while  fgets  */ 

f close ( Finput ) ; 
f c lose ( Foutput ) ; 

}  /*  get  words  */ 
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/*********************************************************************** 
******************************  unique  ******************************** 

* 

*  This  function  removes  all  duplicate  entries  from  the  given  input  file. 

* 

***********************************************************************/ 
void  unique(char  file_name[]) 

{ 

char  tempi ( Buf_size] ,  temp2 ( Buf_size ] ; 

FILE  *Fwork,  *Finput; 

/*  open  working  file  */ 
open_f ile(&Fwork, "w+", "work", "unique" ) ; 
open_f ile(&Finput, "r" , f iie_name, "unique" ) ; 

fgetsv tempi, Buf  size, Finput) ; 
while{ !feof (Finput) ) 

{ 

fgets ( tamp2 , Buf  size, Finput ) ; 
fprintf (Fwork, "%s" , tempi) ; 

while( (strcmp(templ,temp2)  ==  0)  &&  J feof (Finput ) ) 
f gets (temp2,Buf_size, Finput) ; 
strcpy ( tempi , temp2 ) ; 

}  /*  while  */ 

f close ( Fwork) ; 
f close ( Finput) ; 

unlink( f ile_name) ;  /*  delete  the  file  */ 

rename ( "work" , f ilename) ; 

>  /*  unique  */ 


*  PROGRAMMER^JOE  E.  SWANSON 

*  rn^mm 

*  COMSC  5000  Thesis  and  Research 

*  revised  Summer  1991 

* 

*  This  program  takes  a  sorted  list  of  words  and  screen/line  references 

*  and  creates  an  inverted  list  and  index. 

*/ 


#include  "ru.h" 


/*  FUNCTION  PROTOTYPES 
char  *remove_trailing_blanks (char  *str); 


*/ 


void  invert(char  inputf ile[ ], char  invf ile[ ], char  vdxfile[]); 
void  make_inverted_list ( char  ( ] , char  [ ] , char  [  ] )  ; 

/*M  MMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM*/ 


void  invert(char  inputf ile[ ], char  invf ile [], char  vdxfile[]) 

{ 

make_inverted_list ( inputf ile, invf ile, vdxf ile) ; 

>  /*  INVERT  */ 

/*m  mmmmmmmmmmmmrnmmmmmmmmmmmmmmmmmmmm*/ 


* 

*  This  function  takes  the  input  file  and  makes  the  inverted  list  with 

*  index. 

* 


*********************************************************************** 
void  make_inverted_list(char  filename [ j , char  invf ile[ ], char  vdxfile[]) 

{ 


char  line[LEN], 

input [ Buf _aize ] , 
outline[Buf_size] , 
♦word, 

♦remains; 

FILE  *ifp,  *of pi ,  *ofp2; 
int  count=0; 

INVERTNDX  index; 


/*  input  word  */ 

/*  output  line  of  inverted  list  */ 
/*  following  words  */ 

/*  the  rest  of  the  line  */ 

/*  number  of  items  in  index  */ 


/*  open  input  and  output  files  */ 
open_f ile( &if p, "r" , filename, "mk_inv_lst" ) ; 
open_f ile ( Sofpl , "wb+" , invf ile, "mk_inv_lst" ) ; 
open_f ile{ &ofp2 , ”wb+" , vdxf ile, "mk_inv_lst " ) ; 

/*  get  first  occurrence  of  word  and  check  for  more  */ 
if  (fgets( line,LEN, ifp)  ==  NULL) 


{ 


fcloseall( ) ; 


/*  file  is  empty  */ 
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return; 

> 

strcpy (line, strtok( line, "VnXr" )) ;  /*  remove  cr/lf  */ 

strcpy (outline, line) ; 

strcpy ( index. key, remove_trailing_blanks( etrtok( line, ”:”))); 

while  (Ifeof(ifp)) 

{ 

if  (fgets(line,LEN, ifp)  ==  NULL) 
break; 

word  =  remove_trailing_blanks (strtok( line, ” : ” ) ) ; 

while  (strcmp( index. key, word)  ==  0) 

{ 

remains  =  strtok(NULL, ”\n\r" ) ;  /*  remove  newline  character  */ 

strcat (outline, "  : "); 
strcat (outline, remains) ; 

if  ( fgets( line, LEN, ifp)  ==  NULL)  /*  get  next  word  */ 
break; 

word  =  remove_trailing_blanks ( strtok( line,  ”:’’)) ; 

>  /*  while  strcmp  */ 

index. off set  =  ftell(ofpl); 
fprintf (ofpl , "%s\n" , outline) ; 

++count ; 

fwr it e (& index,  1 ,  sizeof  ( INVERTNDX) ,  ofp2 )  ,* 

strcpy ( index . key , word ) ; 

remains  =  strtok(NULL, ”\n\r” ) ; 

strcpy (out line, index. key) ; 

strcat (outline, "  :”); 

strcat (outline, remains) ; 

>  /*  while  feof  */ 

index. offset  =  ftell(ofpl);  /*  write  last  entry  to  disk  */ 

fprintf (ofpl , "%s\n" , outline) ; 

++count; 

fwr ite(& index, 1, sizeof ( INVERTNDX) , ofp2 ) ; 
fcloseall ( ) ; 

}  /*  make  inverted  list  */ 
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/*********************************************************************** 
********************  remove  trailing  blanks  ************************** 

★  ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★a-* 

★ 

*  This  function  takes  the  input  string  and  removes  any  trailing  blanks. 

*  The  modified  string  is  returned. 

* 

***********************************************************************y 
char  *remove__trailing_blanks (char  *str) 

{ 

while  (str[strlen(str)  -  1]  ==  '  ') 
str[strlen(str)  -  1]  =  *\0'; 

return  str; 

}  /*  remove  trailing  blanks 

***********************************************************************/ 
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/* 

*  PROGRAMMER^JOE  E.  SWANSON 

*  HHHI 

*  COMSC  5000  Thesis  and  Research 

*  revised  Summer  1991 

* 

*  This  program  was  developed  on  a  12  Mhz  80286  IBM  AT  compatible  using 

*  Microsoft  Quick  C  2.5.  The  program  is  designed  to  make  use  of  a  hard 

*  disk.  As  the  DOS  sort  utility  is  limited  to  <  64K,  the  data  is  read 

*  in  blocks  of  16K;  this  was  the  block  size  that  produced  the  quickest 

*  run  time  on  the  development  system.  The  blocks  are  sorted  and  then 

*  merged  in  the  sort{)  function. 

*/ 

^include  <stdio.h> 

#include  <string.h> 

#include  <stdlib.h> 

#define  buf_size  16000 

#define  Max_line  500 

#define  _ot  print f 

/*  FUNCTION  PROTOTYPES  */ 

char  *merge_input (FILE  *input,char  ^previous, char  last_word[], 

int  *flag); 

void  checkpath(char  input[],  char  varname[]); 
void  merge(char  filel[],char  file2(]»char  file3[]); 
void  sort(char  file_namel))» 

void  openf ile(FILE  **fp,char  type(],char  name[],char  module[]); 

/*********************************************************************** 
*********************************  sort  ******************************* 
★★a********************************************************************* 

* 

*  This  function  makes  the  necessary  calls  to  the  DOS  sort  utility. 

*  Data  is  read  in  16k  blocks,  sorted  and  then  merged.  As  the  DOS  sort 

*  utility  does  not  provide  the  ”-u"  option,  a  unique()  function  is 

*  required  if  duplicates  are  to  be  removed.  The  unique  function 

*  should  be  called  immediately  following  sort. 

* 

*********************************************************************** i 

void  sort (char  file_name[]) 

{ 

unsigned  int  x;  /*  bytes  read  into  buffer  */ 

FILE  *Fworkin,  *Fsorted,  *Ftemp,  *Ftempl; 
static  char  f ile_buf fer(buf_size] ; 
int  y  =  0; 

checkpath(" sort.exe", "PATH") ; 

openf ile (SFtempl, ”r", f ile_name, "sort” ) ; 

while  ( (x=fread(f ile_buf fer,  1,  buf_size-Max_line,  Ftempl))  >  0) 


{ 


if  ( i feof (Ftempl ) ) 

{ 

fgets(&f ile_buf fer(x) ,Max_line-l, Ftempl) ;  /*  complete  the  last 

*  line  of  buffer  */ 

x  =  x  +  strlen(&file_buffer[x] ) ;  /*  number  of  bytes  read  */ 

>  /*  if  */ 

openf ile (&Fworkin,  "w" ,  "workin",  "sort"  ) ; 
fwrite( file_buffer,x, 1, Fworkin) ; 
fclose(Fworkin) ; 

system ("sort  <  workin  >  workout"); 

merge ( "workout” , "sorted" , "temp" ) ; 

uni ink ( "sorted" ) ;  /*  delete  the  file  */ 

rename ( "temp" , "sorted" ) ; 

uni ink ( "workout" ) ; 

>  /*  while  */ 

fclose( Ftempl) ; 

unlink( f ile_name) ;  /*  delete  the  file  */ 

rename ( "sorted" , file_name) ; 
unlink ( "workin" ) ; 

>  /*  sort  */ 

y**********************************************************************y 

y*********************************************************************** 
******************************  merge  ********************************* 

4r4r4r*4r4r4r*4r4r4r4r4r*4r4r4r4r4r**4r**4r******4r4r4r4r*4r4r*4r4r**4r***********4r*4r************** 

★ 

*  This  function  completes  a  merge  of  two  data  sets  putting  the  output 

*  into  the  specified  file.  This  is  a  cosequential  merge  that  requires 

*  that  both  input  files  be  sorted  in  lexicographical  order  prior  to 

*  the  merge. 

* 

***********************************************************************/ 
void  merge(char  filel(],  char  file2[]>  char  file3[]) 

{ 

int  more_words_exist  =  1; 

char  linel [Max_line] ,  line2 [Max_line] ,  linelp(Max_line )  = 
line2p(Max_line)  = 

FILE  *Fpl ,  *Fp2 ,  *Fp3 ; 

openfile(&Fpl, "r", filel, "merge")  ; 
openf ile (&Fp2 , "a" , f ile2 , "merge" ) ; 
rewind (Fp2 ) ; 

openf ile (&Fp3, "w", file3, "merge" ) ; 

/*  initial  read  */ 

strcpy ( linel, merge_input (Fpl, linelp,NULL, &more_words_exist ) ) ; 
strcpy(line2,merge_input(Fp2, line2p, NULL, &more_words  exist)  ); 
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/*  while  more  words  exist,  if  linel  <  line2,  output  linel;  else  if 
*  linel  >  line2,  output  line2  else  if  ==  output  and  get  new  lines  */ 

while  (more_words_exist ) 

{ 

if  (strcmp( linel, line2 )  <  0) 

{ 

fprintf (Fp3, "%s”, linel) ; 

strcpy ( linel,merge_input (Fpl, linelp, line2 , &more_words_exist ) ) ; 

>  /*  if  */ 

else  if  ( strcmp( linel , line2 )  >  0) 

{ 

fprintf (Fp3, "%s" , line2 ) ; 

strcpy ( line2 ,merge_input (Fp2 ,  line2p, linel, &more_words_exist ) ) ; 

}  /*  if  */ 

else 

{ 

fprintf (Fp3, "%s" , linel ) ; 

strcpy ( linel, merge_input (Fpl , linelp, line2 , &more_words_exist ) ) ; 
strcpy ( line2 ,merge_input ( Fp2 , line2p, linel ,&more_words_exist ) ) ; 
}  /*  else  */ 

}  /*  while  */ 

fclose(Fpl) ; 
fclose(Fp2) ; 
fclose(Fp3) ; 

)  /*  merge  */ 

/**************************** ******************************************  j 
J-k-k-k-k-k-k-k-k-k-k-k-k-k-kifk-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k-k^-k-k-k^-k-k^-k’k’k-k’kick-k-k-k-k-k-k’k’k’k’k’k’k’k’k’k-k-k’k 

**************************  merge  input  ******************************* 
************************************************************************ 

* 

*  This  function  returns  the  new  input  called  for  and  the  flag  that 

*  determines  when  both  input  files  are  exhausted  for  functions  merge(). 

*  Outputbak  keeps  a  copy  of  output  in  its  original  case  form.  This 

*  allows  all  comparisons  to  be  based  on  lower  case  letters,  but  it  will 

*  allow  the  file  to  maintain  case. 

* 

***********************************************************************  j 

char  *merge_input (FILE  *input,char  *previous,char  last_word[ ] , int  *flag) 

{ 

char  high_value( ]  =  "  ", 

output [Max_line]  = 
outputbak(Max_line] , 

*inp, 

tempi (Max_line) ,  temp2 [Max_line] ; 
inp  =  f gets (output, Max_line, input) ; 
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if  ( 1 inp  &&  (strcmp(last_word,high_value)  ==  0)) 

*flag  =  0;  /*  both  input  files  empty  */ 

else 

if  ( 1 inp) 

strcpy ( output, high_value) ;  /*  input  file  is  empty  */ 

else 

{ 

strcpy (outputbak, output) ; 
strcpy(templ,strlwr(output) ) ; 
strcpy(temp2, strlwr (previous ) ) ; 

if  (strcmp( tempi, temp2)  <  0) 

{ 

system ( "els" ) ; 

_ot("Input  file  not  sorted.  Program  terminated."); 
exit ( 1001 ) ; 

} 

strcpy (output, outputbak) ; 

} 

strcpy ( prev ious , output ) ; 
return  output; 

}  /*  merge  input  */ 

/A*********************************************************************/ 

/(Hr********************************************************************* 

****************************  checkpath  ******************************* 
★ 

*  Function  checkpath  insures  the  input  file  can  be  found  on  the  current 

*  PATH.  If  it  fails,  the  program  aborts. 

* 

void  checkpath (char  input(J,  char  varname[J) 

{ 

char  targetf ile( 13 ] , 
pathname! 256)  = 

strcpy(targetfile, input) ; 

_searchenv ( target f ile , varname , pathname ) ; 

if  (pathname(O)  ==  '\0') 

{ 

_ot("This  program  requires  the  program/file  %s  to  run. \n" , input) ; 
if  (strcmp( input, "sort.exe" )  ==  0) 

{ 

_ot( "Insure  the  system  PATH  contains  the  directory  containing"); 
_ot("  sort.exe. \n" ) ; 

_ot( "Check  your  DOS  manual  for  detailed  instructions  if  "); 

_ot ( "necessary l \n” ) ; 


108 


> 

else  _ot( "Insure  the  file  is  in  the  current  directory . \n" ) ; 
exit ( 2 ) ; 

>  /*  if  pathname  */ 

>  /*  check  path  */ 

/*********************************************************************** 
****************************  open  file  ******************************* 
************************************************************************ 
* 

*  This  procedure  opens  the  input  and  output  files  for  this  program. 

* 

***********************************************************************^ 
void  openf ile ( FILE  **fp,char  type[],char  name[],char  module[]) 

{ 

/*  open  input  and  output  files  */ 
if  ({*fp  =  fopen(name, type) )  ==  NULL) 

{ 

fprintf ( stderr , "INPUT/OUTPUT  FILE  NOT  FOUND. \n”); 

fprintf ( stderr , "File  %s  not  found  in  function  %s. \n" , name, module ) ; 
exit (1001) ; 

> 

>  /*  openfile  */ 

/**********************************************************************/ 
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/* 

*  PROGRAMMERsJOE  E .  SWANSON 

*  HHHHH 

*  COMSC  5000  Thesis  and  Research 

*  Summer  1991 
*/ 

#include  <stdio.h> 

#include  <string.h> 

#include  <stdlib.h> 

#define  _ot  print f 

j * ********************************************************************** 

****************************  check  path  ****************************** 
************************************************************************ 

* 

*  Function  check_path  insures  the  input  file  can  be  found  on  the  current 

*  varname.  If  it  fails,  it  returns  a  flag. 

* 

*  Passed  parameter  flag  =  1,  input  is  required.  Program  terminates  if 

*  not  found. 

*  Passed  parameter  flag  =  2,  input  is  optional  or  existence  is  being 

*  confirmed. 

*  Flag  is  returned. 

* 

**************************************★***★****************************/ 
int  check_path(char  input[],  char  varname[],  int  flag) 

{ 

char  target f ile[ 13 ) , 
pathname [256]  = 

strcpy (targetf ile, input) ; 

_sear chenv ( target  file, varname , pathname ) ; 

switch ( flag) 

{ 

case  1;  /*  required  files  */ 

if  (pathname[0]  ==  ' \0 ' ) 

{ 

_ot(”This  program  requires  the  program/file  %s  to  run.\n", 

input ) ; 

if  ( st rcmp( input, "sort.exe")  ==  0) 

{ 

_ot(" Insure  the  system  PATH  contains  the  directory  \ 
containing" ) ; 

_ot("  sort.exe. \n" ) ; 

_ot( "Check  your  DOS  manual  for  detailed  instructions  if  "); 

_ot ( "necessary  1 \n” ) ; 

>  ' 

else  _ot( "Insure  the  file  is  in  the  current  directory . \n" ) ; 


exit (2) ; 
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}  /*  if  pathname  */ 
break; 

case  2: 

if  (pathname [0] 
else  flag  =  1; 
break; 

default:  flag  =  0; 

>  /*  switch  */ 

return  flag; 

}  / *  check  path  */ 

/★a********************************************************************/ 


/*  optional  or  check  to  see  if  exist  */ 
==  ' \0' )  flag  =  0; 


APPENDIX  D 

FUNCTION  FACET  THESAURUS 
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*  NOT  APPLICABLE,* 
access , accesses 
add, increment, total, sum 
append , attach , increase 
assign, designate 

close, release, detach, disconnect, free 
compare, test, relate, match, check, verify 
complement, negate, invert 
compress , shrink, condense , compact 

control , controls , command , manipulate , direct , handle , operate , operates 

convert, converts 

coordinate, coordinates 

copy 

create 

decode 

delete 

divide 

evaluate 

exchange, swap 

execute , executes 

expand 

extract , extracts 
format 

initialize, set  up, start 

initiate, start 

input 

insert 

join 

list, count 
load, loads 
maintain 

measure, advance, size, enumerate, list 
modify, change, revise 
move , transfer 
output , produce 

process , processes , filter , prepare 

read, reads 

save 

schedule, schedules 
terminate , remove , ki 1 1 


APPENDIX  E 

OBJECT  FACET  THESAURUS 
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*  NOT  APPLICABLE,* 
address , addresses 
arguments , argument 
arrays, array 
buffers, buffer 
card  stack, cards 
character , characters , char 
descriptors 
digits 

directories, directory 
doubles, double 
expressions 
files 

floats, float 

functions 

hexadecimal 

instruct ion, command, commands, instructions, inst 

integers , integer , int , long  int , long , short 

interrupts 

jobs, job 

lines 

lists 

macros 

memory 

message 

node, nodes 

page, pages 

processes , process 

queue 

registers, register 
schedu les , schedu le 
simulated  disk  entry 
statistics 
string, strings 
structure, structures 
system 


APPENDIX  F 

MEDIUM  FACET  THESAURUS 
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*  NOT  APPLICABLE,* 
array, arrays 
buffer 
cards 

character , characters, char 

disk, disks 

double 

file 

float 

integer, long  int,long  integer , short, long, int , short  int 

job, jobs 

keyboard 

line 

linked  list, deque, deques, list 

mouse 

node, nodes 

operating  system, operating  systems, os 
printer 

process  cntl  block, pcb 

process , processes 

schedule, schedules 

screen 

sensor 

stack 

string, strings 

structure, structures 

table 

tape 

tree 


APPENDIX  G 

SYSTEM  TYPE  FACET  THESAURUS 
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*  NOT  APPLICABLE,* 

extractor , extractors 

generic , general , gen , universal 

operating  system, operating  systems, os 

processor, processors 

scheduler , schedulers 

simulated  disk 

simulation, simulations 
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*  NOT  APPLICABLE, * 
base  conversions 
context  switching 
error  handling 

generic, general, gen, universal 
initialization, init 

io  operations, read, write, output, input 
job  io, read, write, output, input 
job  tracing 

memory  management, mem  mgmt 

paging 

processing 

scheduling 

simulation 

statistics, statistic 

string  conversion 

system  synchronization 


APPENDIX  I 

SETTING  FACET  THESAURUS 
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*  NOT  APPLICABLE,* 

academic, scholarly, classical, educational, collegiate, school, edu 
generic, general , gen, universal 


APPENDIX  J 

LANGUAGE  FACET  THESAURUS 
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Ada, ada 
BASIC, basic 
C,c 

FORTRAN, fortran 
Pascal, pascal 
PL/ I, pi /l, pi/ i 


APPENDIX  K 

SAMPLE  QUERY  RESULTS 
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Sample  1  -  six  facets 
loader 

The  attributes  requested 

Function 

Object 

Medium 

System  Type 

Functional  Area 

Setting 

Other 


are: 

—  load 

—  jobs 

—  operating  system 

—  job  io 

—  academic 


**************************************** 


The  attributes  of  winldr.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

jobs 

operating  system 
job  io 
academic 
C 


winldr.c  matched  5  attributes. 
**************************************** 


The  attributes  of  loader 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


c  are: 

—  load 

—  jobs 

—  operating  system 

—  job  io 

—  academic 
—  C 


loader. c  matched  5  attributes. 
**************************************** 
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The  attributes  of  misspool.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


terminate 

jobs 

process  cntl  block 
operating  system 
job  io 
academic 
C 


misspool.c  matched  4  attributes. 
**************************************** 


The  attributes  of  misldr 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


c  are: 

—  load 

—  -  queue 

—  operating  system 

—  job  io 

—  academic 
—  C 


misldr. c  matched  4  attributes. 
**************************************** 


The  attributes  of  spooler. c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


read 

card  stack 
structure 
operating  system 
job  io 
academic 
C 


spooler. c  matched  3  attributes. 
**************************************** 
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The  attributes  of  missched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
acade.  '  z 
C 


missched.c  matched  3  attributes. 
**************************************** 


The  attributes  of  mispgld.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgld.c  matched  3  attributes. 
**************************************** 


The  attributes  cf  j-sched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
academic 
C 


j-sched.c  matched  3  attributes. 
**************************************** 
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The  attributes  of  winmem 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

winmem. c  matched  2  attri! 
************************ 


c  are: 

—  access 

—  memory 

—  array 

—  operating  system 

—  memory  management 

—  academic 
—  C 


*************** 


The  attributes  of  winhexc.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

digits 

integer 

operating  system 
base  conversions 
academic 
C 


winhexc.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winerror.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

message 

string 

operating  system 
error  handling 
academic 
C 


winerror.c  matched  2  attributes. 
**************************************** 


The  attributes  of  wincpu.c  are 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


wincpu.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winconv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

address 

integer 

operating  system 
memory  management 
academic 
C 


winconv.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misregs.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


maintain 

registers 

array 

operating  system 
context  switching 
academic 
C 


misregs.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  mispgsv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


save 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgsv.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgflt.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


assign 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgflt.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mismem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


mismem.c  matched  2  attributes. 
**************************************** 


' 
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The  attributes  of  misio. 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


are: 

—  execute 

—  instruction 

—  structure 

—  operating  system 

—  io  operations 

—  academic 
—  C 


misio. c  matched  2  attributes. 
**************************************** 


The  attributes  of  misinit.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


initialize 

system 

operating  system 
operating  system 
initialization 
academic 
C 


misinit.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misfstat.c  are: 


Function 
Object 
Medium 
System  Type 
Functi  mal  Area 
Setting 
Language 
Other 


output 

statistics 

string 

operating  system 
statistics 
academic 
C 


misfstat.c  matched  2  attributes. 
**************************************** 


The  attributes  of  disk.c  are 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


control 

simulated  disk  entry 

structure 

operating  system 

simulation 

academic 

C 


disk.c  matched  2  attributes. 
**************************************** 


The  attributes  of  cpu.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


cpu.c  matched  2  attributes. 
**************************************** 
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Sample  la  -  four  facets 
loader 

The  attributes  requested 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Other 

**************************************** 


The  attributes  of  winldr.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

winldr.c  matched  3  attributes. 
**************************************** 


The  attributes  of  loader. c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

loader. c  matched  3  attributes. 
**************************************** 


—  load 

—  jobs 

—  operating  system 

—  job  io 

—  academic 

—  C 


—  load 

—  jobs 

—  operating  system 

—  job  io 

—  academic 

—  C 


are: 

—  load 

—  jobs 

—  job  io 
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The  attributes  of  misspool.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


terminate 

jobs 

process  cntl  block 
operating  system 
job  io 
academic 
C 


misspool.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misldr.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

queue 

operating  system 
job  io 
academic 
C 


misldr.c  matched  2  attributes. 
**************************************** 


The  attributes  of  missched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
academic 
C 


missched.c  matched  1  attribute. 
**************************************** 
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The  attributes  of  mispgld.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgld.c  matched  1  attribute. 
**************************************** 


The  attributes  of  j-sched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
academic 
C 


j-sched.c  matched  1  attribute. 
**************************************** 
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Sample  2  -  six  facets 
memory 

The  attributes  requested  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Other 

**************************************** 


The  attributes  of  winmem.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

winmem.c  matched  6  attributes. 
**************************************** 


The  attributes  of  mismem.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

mismem.c  matched  6  attributes. 
**************************************** 


—  access 

—  memory 

—  array 

—  operating  system 

—  memory  management 

—  academic 

—  C 


—  access 

—  memory 

—  array 

—  operating  system 

—  memory  management 

—  academic 

—  C 


—  access 

—  memory 

—  array 

—  operating  system 

—  memory  management 

—  academic 
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The  attributes  of  memory. c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


—  access 

—  memory 

—  array 

—  operating  system 

—  memory  management 

—  academic 

—  C 


memory. c  matched  6  attributes. 
**************************************** 


The  attributes  of  winconv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

address 

integer 

operating  system 
memory  management 
academic 
C 


winconv.c  matched  3  attributes. 

**************************************** 


The  attributes  of  misregs.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


maintain 

registers 

array 

operating  system 
context  switching 
academic 
C 


misregs.c  matched  3  attributes. 
**************************************** 
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The  attributes  of  misfrpg.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


close 

page 

array 

operating  system 
paging 
academic 
C 


misfrpg.c  matched  3  attributes. 
**************************************** 


The  attributes  of  winhexc.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

digits 

integer 

operating  system 
base  conversions 
academic 
C 


winhexc.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winerror.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

message 

string 

operating  system 
error  handling 
academic 
C 


winerror.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  wincpu.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


wincpu.c  matched  2  attributes. 
**************************************** 


The  attributes  of  spooler. c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


read 

card  stack 
structure 
operating  system 
job  io 
academic 
C 


spooler. c  matched  2  attributes. 
**************************************** 


The  attributes  of  misspool.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


—  terminate 
--  jobs 

—  process  cntl  block 

—  operating  system 

—  job  io 

—  academic 

—  C 


misspool.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  mispgsv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


save 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgsv.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgld.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgld.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgflt.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


assign 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgflt.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  misio.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

structure 

operating  system 

io  operations 

academic 

C 


misio.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misinit.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


initialize 

system 

operating  system 
operating  system 
initialization 
academic 
C 


misinit.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misfstat.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

statistics 

string 

operating  system 
statistics 
academic 
C 


misfstat.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  disk.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


control 

simulated  disk  entry 

structure 

operating  system 

simulation 

academic 

C 


disk.c  matched  2  attributes. 
**************************************** 


The  attributes  of  cpu.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cnt.>  L .  ,ck 

operating  system 

processing 

academic 

C 


cpu.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misishex.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


—  compare 

—  hexadecimal 

—  array 

—  generic 

—  generic 

—  generic 

—  C 


misishex.c  matched  1  attribute. 
**************************************** 
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Sample  2a  -  four  facets 
memory 


The  attributes  requested  are: 


Function 

Object 

Medium 

System  Type 

Functional  Area 

Setting 

Other 


access 

memory 

array 

memory  management 


**************************************** 


The  attributes  of  winmem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


winmem.c  matched  4  attributes. 
**************************************** 


The  attributes  of  mismem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


mismem.c  matched  4  attributes. 
**************************************** 
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The  attributes  of  memory. c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


memory. c  matched  4  attributes. 
**************************************** 


The  attributes  of  misregs.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


maintain 

registers 

array 

operating  system 
context  switching 
academic 
C 


misregs.c  matched  1  attribute. 
**************************************** 


The  attributes  of  misishex.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


—  compare 

—  hexadecimal 

—  array 

—  generic 

—  generic 

—  generic 

—  C 


misishex.c  matched  1  attribute. 
**************************************** 


146 


The  attributes  of  misfrpg.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


close 

page 

array 

operating  system 
paging 
academic 
C 


misfrpg.c  matched  1  attribute. 
**************************************** 


Sample  3  -  six  facets 
cpu 

The  attributes  requested  are 
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Function 

Object 

Medium 

System  Type 

Functional  Area 

Setting 

Other 


execute 

instruction 

integer 

operating  system 

processing 

academic 


**************************************** 


The  attributes  of  wincpu.c 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


are: 

—  execute 

—  instruction 

—  process  cntl  block 

—  operating  system 

—  processing 

—  academic 
—  C 


wincpu.c  matched  5  attributes. 
**************************************** 


The  attributes  of  miscpu.c 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


are: 

—  execute 

—  instruction 

—  process  cntl  block 

—  operating  system 

—  processing 

—  academic 
—  C 


miscpu.c  matched  5  attributes. 
**************************************** 


The  attributes  of  cpu.c  are 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


cpu.c  matched  5  attributes. 
**************************************** 


The  attributes  of  winterm.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

string 

operating  system 
io  operations 
academic 
C 


winterm.c  matched  4  attributes. 
**************************************** 


The  attributes  of  misio. 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


are: 

—  execute 

—  instruction 

—  structure 

—  operating  system 

—  io  operations 

—  academic 
—  C 


misio. c  matched  4  attributes. 
**************************************** 
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The  attributes  of  winhexc.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

digits 

integer 

operating  system 
base  conversions 
academic 
C 


winhexc.c  matched  3  attributes. 
**************************************** 


The  attributes  of  winconv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

address 

integer 

operating  system 
memory  management 
academic 
C 


winconv.c  matched  3  attributes. 
**************************************** 


The  attributes  of  winmem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


winmem.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  winerror.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

message 

string 

operating  system 
error  handling 
academic 
C 


winerror.c  matched  2  attributes. 
**************************************** 


The  attributes  of  spooler. c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


read 

card  stack 
structure 
operating  system 
job  io 
academic 
C 


spooler. c  matched  2  attributes. 
**************************************** 


The  attributes  of  misspool.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


terminate 

jobs 

process  cntl  block 
operating  system 
job  io 
academic 
C 


misspool.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misregs.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


maintain 

registers 

array 

operating  system 
context  switching 
academic 
C 


misregs.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgsv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


save 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgsv.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgld.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


-  load 

-  page 

-  buffer 

-  operating  system 

-  paging 

-  academic 

-  C 


mispgld.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  mispgflt.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


assign 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgflt.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mismem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


mismem.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misitoa.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

integers 

integer 

string  conversion 

academic 

C 


misitoa.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  misinit.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


initialize 

system 

operating  system 
operating  system 
initialization 
academic 
C 


misinit.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misfstat.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

statistics 

string 

operating  system 
statistics 
academic 
C 


misfstat.c  matched  2  attributes. 
**************************************** 


The  attributes  of  disk.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


control 

simulated  disk  entry 

structure 

operating  system 

simulation 

academic 

C 


disk.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  mismax.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


compare 

integers 

integer 

generic 

generic 

generic 

C 


mismax.c  matched  1  attribute. 
**************************************** 
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Sample  3a  -  four  facets 
cpu 

The  attributes  requested  are: 

execute 
instruction 
integer 

processing 


**************************************** 


The  attributes  of  wincpu.c  are: 

execute 
instruction 
process  cntl  block 
operating  system 
processing 
academic 
C 


wincpu.c  matched  3  attributes. 
**************************************** 


The  attributes  of  miscpu.c  are: 

execute 
instruction 
process  cntl  block 
operating  system 
processing 
academic 
C 


miscpu.c  matched  3  attributes. 
**************************************** 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


Function 

Object 

Medium 

System  Type 

Functional  Area 

Setting 

Language 

Other 


Function 

Object 

Medium 

System  Type 

Functional  Area 

Setting 

Other 
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The  attributes  of  cpu.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


cpu.c  matched  3  attributes. 
**************************************** 


The  attributes  of  winterm.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

string 

operating  system 
io  operations 
academic 
C 


winterm.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misio. 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


are: 

—  execute 

—  instruction 

—  structure 

—  operating  system 

—  io  operations 

—  academic 
—  C 


misio. c  matched  2  attributes. 
**************************************** 
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The  attributes  of  winhexc.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

digits 

integer 

operating  system 
base  conversions 
academic 
C 


winhexc.c  matched  1  attribute. 
**************************************** 


The  attributes  of  winconv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

address 

integer 

operating  system 
memory  management 
academic 
C 


winconv.c  matched  1  attribute. 
**************************************** 


The  attributes  of  mismax.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


compare 

integers 

integer 

generic 

generic 

generic 

C 


mismax.c  matched  1  attribute. 
**************************************** 
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The  attributes  of  misitoa.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

integers 

integer 

string  conversion 

academic 

C 


misitoa.c  matched  1  attribute. 
**************************************** 
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Sample  4  -  six  facets 
spooler 

The  attributes  requested  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Other 

**************************************** 


The  attributes  of  winspool.c  are: 

Function  —  read 

Object  —  card  stack 

Medium  —  process  cntl  block 

System  Type  —  operating  system 

Functional  Area  —  job  io 

Setting  —  academic 

Language  —  C 

Other 

winspool.c  matched  5  attributes. 
**************************************** 


The  attributes  of  spooler. c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

spooler. c  matched  5  attributes. 
**************************************** 


—  read 

—  card  stack 

—  structure 

—  operating  system 

—  job  io 

—  academic 

—  C 


—  read 

—  card  stack 

—  operating  system 

—  job  io 

—  academic 
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The  attributes  of  misspool.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


terminate 

jobs 

process  cntl  block 
operating  system 
job  io 
academic 
C 


misspool.c  matched  3  attributes. 
**************************************** 


The  attributes  of  winmem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


winmem.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winhexc.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

digits 

integer 

operating  system 
base  conversions 
academic 
C 


winhexc.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  winerror.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

message 

string 

operating  system 
error  handling 
academic 
C 


winerror.c  matched  2  attributes. 
**************************************** 


The  attributes  of  wincpu.c  are: 

Function 
'  Object 

Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


wincpu.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winconv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

address 

integer 

operating  system 
memory  management 
academic 
C 


winconv.c  matched  2  attributes. 
**************************************** 


162 


The  attributes  of  misregs.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


maintain 

registers 

array 

operating  system 
context  switching 
academic 
C 


misregs.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgsv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


save 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgsv.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgld.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgld.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  mispgflt.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


assign 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgflt.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mismem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


mismem.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misio.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

structure 

operating  system 

io  operations 

academic 

C 


misio.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  misinit.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


initialize 

system 

operating  system 
operating  system 
initialization 
academic 
C 


misinit.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misfstat.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

statistics 

string 

operating  system 
statistics 
academic 
C 


misfstat.c  matched  2  attributes. 
**************************************** 


The  attributes  of  disk.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


control 

simulated  disk  entry 

structure 

operating  system 

simulation 

academic 

C 


disk.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  cpu.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


cpu.c  matched  2  attributes. 
**************************************** 
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Sample  4a  -  four  facets 
spooler 

The  attributes  requested  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Other 

**************************************** 


The  attributes  of  winspool.c  are: 

Function  —  read 

Object  —  card  stack 

Medium  —  process  cntl  block 

System  Type  —  operating  system 

Functional  Area  —  job  io 

Setting  —  academic 

Language  —  C 

Other 

winspool.c  matched  3  attributes. 
**************************************** 


The  attributes  of  spooler. c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

spooler. c  matched  3  attributes. 
**************************************** 


—  read 

—  card  stack 

—  structure 

—  operating  system 

—  job  io 

—  academic 

—  C 


—  read 

—  card  stack 

—  job  io 
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Sample  5  -  six  attributes 
scheduler 

The  attributes  requested 

Function 

Object 

Medium 

System  Type 

Functional  Area 

Setting 

Other 


are: 

—  schedule 

—  jobs 

—  operating  system 

—  scheduling 

—  academic 


**************************************** 


The  attributes  of  missched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
academic 
C 


missched.c  matched  5  attributes. 
**************************************** 


The  attributes  of  j-sched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
academic 
C 


j-sched.c  matched  5  attributes. 
**************************************** 
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The  attributes  of  winldr.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

jobs 

operating  system 
job  io 
academic 
C 


winldr.c  matched  3  attributes. 
**************************************** 


The  attributes  of  misspool.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


terminate 

jobs 

process  cntl  block 
operating  system 
job  io 
academic 
C 


misspool.c  matched  3  attributes. 
**************************************** 


The  attributes  of  loader 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


c  are: 

—  load 

—  jobs 

—  operating  system 

—  job  io 

—  academic 
—  C 


loader. c  matched  3  attributes. 
**************************************** 
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The  attributes  of  winmem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


access 

memory 

array 

operating  system 
memory  management 
academic 
C 


winmem.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winhexc.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


convert 

digits 

integer 

operating  system 
base  conversions 
academic 
C 


winhexc.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winerror.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

message 

string 

operating  system 
error  handling 
academic 
C 


winerror.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  wincpu.c  are: 

Function  —  execute 

Object  —  instruction 

Medium  —  process  cntl  block 

System  Type  —  operating  system 

Functional  Area  —  processing 

Setting  —  academic 

Language  --  C 

Other 

wincpu.c  matched  2  attributes. 
**************************************** 


The  attributes  of  winconv.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

winconv.c  matched  2  attributes. 
**************************************** 


The  attributes  of  spooler. c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 

spooler. c  matched  2  attributes. 
**************************************** 


—  read 

--  card  stack 

—  structure 

—  operating  system 

—  job  io 

—  academic 

—  C 


—  convert 

—  address 

—  integer 

—  operating  system 

—  memory  management 

—  academic 

—  C 
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The  attributes  of  misregs.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


maintain 

registers 

array 

operating  system 
context  switching 
academic 
C 


misregs.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgsv.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


save 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgsv.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mispgld.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


load 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgld.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  mispgflt.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


assign 

page 

buffer 

operating  system 
paging 
academic 
C 


mispgflt.c  matched  2  attributes. 
**************************************** 


The  attributes  of  mismem.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


—  access 

—  memory 

—  array 

—  operating  system 

—  memory  management 

—  academic 

—  C 


mismem.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misio.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

structure 

operating  system 

io  operations 

academic 

C 


misio.c  matched  2  attributes. 
**************************************** 
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The  attributes  of  misinit.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


initialize 

system 

operating  system 
operating  system 
initialization 
academic 
C 


misinit.c  matched  2  attributes. 
**************************************** 


The  attributes  of  misfstat.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


output 

statistics 

string 

operating  system 
statistics 
academic 
C 


misfstat.c  matched  2  attributes. 
**************************************** 


The  attributes  of  disk.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


control 

simulated  disk  entry 

structure 

operating  system 

simulation 

academic 

C 


disk.c  matched  2  attributes. 
**************************************** 


I 
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The  attributes  of  cpu.c  are: 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


execute 

instruction 

process  cntl  block 

operating  system 

processing 

academic 

C 


cpu.c  matched  2  attributes. 
**************************************** 
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Sample  5a  -  four  attributes 
scheduler 


The  attributes  requested  are: 

Function 

Object 

Medium 

System  Type 

Functional  Area 

Setting 

Other 


schedule 

jobs 


scheduling 


**************************************** 

The  attributes  of  missched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
academic 
C 


missched.c  matched  3  attributes. 
**************************************** 


The  attributes  of  j-sched.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


schedule 

jobs 

operating  system 
scheduling 
academic 
C 


j-sched.c  matched  3  attributes. 
**************************************** 
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The  attributes  of  winldr 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


c  are: 

—  load 

—  jobs 

—  operating  system 

—  job  io 

—  academic 
—  C 


winldr. c  matched  1  attribute. 
**************************************** 


The  attributes  of  misspool.c  are: 


Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


terminate 

jobs 

process  cntl  block 
operating  system 
job  io 
academic 
C 


misspool.c  matched  1  attribute. 
**************************************** 


The  attributes  of  loader 

Function 
Object 
Medium 
System  Type 
Functional  Area 
Setting 
Language 
Other 


c  are: 

—  load 

—  jobs 

—  operating  system 

—  job  io 

—  academic 
—  C 


loader. c  matched  1  attribute. 
**************************************** 
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